diff options
Diffstat (limited to 'lang/gnat/files/patch-am')
| -rw-r--r-- | lang/gnat/files/patch-am | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/lang/gnat/files/patch-am b/lang/gnat/files/patch-am deleted file mode 100644 index ae8b2a9db558..000000000000 --- a/lang/gnat/files/patch-am +++ /dev/null @@ -1,32 +0,0 @@ ---- ada/g-os_lib.adb.orig Fri Feb 1 23:18:26 2002 -+++ ada/g-os_lib.adb Fri Feb 1 23:22:08 2002 -@@ -192,26 +192,13 @@ - (FD : out File_Descriptor; - Name : out Temp_File_Name) - is -- function Get_Temp_Name (T : Address) return Address; -- pragma Import (C, Get_Temp_Name, "mktemp"); -- -- function Open_New_Temp -- (Name : System.Address; -- Fmode : Mode) -- return File_Descriptor; -- pragma Import (C, Open_New_Temp, "open_new_temp"); -+ function Open_New_Temp (T : Address) return File_Descriptor; -+ pragma Import (C, Open_New_Temp, "mkstemp"); - - begin - Name (1 .. Temp_File_Len - 1) := "GNAT-XXXXXX"; - Name (Temp_File_Len) := ASCII.NUL; -- -- -- Check for NULL pointer returned by C -- -- if Get_Temp_Name (Name'Address) = Null_Address then -- FD := -1; -- else -- FD := Open_New_Temp (Name'Address, Binary); -- end if; -+ FD := Open_New_Temp (Name'Address); - end Create_Temp_File; - - ----------------- |