diff options
Diffstat (limited to 'gcc/ada/gnatlink.adb')
| -rw-r--r-- | gcc/ada/gnatlink.adb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/ada/gnatlink.adb b/gcc/ada/gnatlink.adb index 61d3db3..de9d491 100644 --- a/gcc/ada/gnatlink.adb +++ b/gcc/ada/gnatlink.adb @@ -1614,7 +1614,9 @@ begin -- Pass -mrtp to the linker if --RTS=rtp was passed if Arg'Length > 8 - and then Arg (Arg'First + 6 .. Arg'First + 8) = "rtp" + and then + (Arg (Arg'First + 6 .. Arg'First + 8) = "rtp" + or else Arg (Arg'Last - 2 .. Arg'Last) = "rtp") then Linker_Options.Increment_Last; Linker_Options.Table (Linker_Options.Last) := |