diff options
Diffstat (limited to 'gcc/ada/5lml-tgt.adb')
| -rw-r--r-- | gcc/ada/5lml-tgt.adb | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/5lml-tgt.adb b/gcc/ada/5lml-tgt.adb index b9d4217..fbe5054 100644 --- a/gcc/ada/5lml-tgt.adb +++ b/gcc/ada/5lml-tgt.adb @@ -175,12 +175,13 @@ package body MLib.Tgt is Success : Boolean; Oldpath : String (1 .. Lib_Version'Length + 1); Newpath : String (1 .. Lib_File'Length + 1); - Result : Integer; + + Result : Integer; + pragma Unreferenced (Result); function Symlink (Oldpath : System.Address; - Newpath : System.Address) - return Integer; + Newpath : System.Address) return Integer; pragma Import (C, Symlink, "__gnat_symlink"); begin |