diff options
Diffstat (limited to '')
-rw-r--r-- | lang/jgnat/files/patch-ac | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/lang/jgnat/files/patch-ac b/lang/jgnat/files/patch-ac deleted file mode 100644 index c2c1be7597b1..000000000000 --- a/lang/jgnat/files/patch-ac +++ /dev/null @@ -1,31 +0,0 @@ ---- g-os_lib.adb.orig Tue Apr 4 20:32:52 2000 -+++ g-os_lib.adb Tue Apr 4 20:33:38 2000 -@@ -173,25 +173,11 @@ - (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 Get_Temp_Name (T : Address) return File_Descriptor; -+ pragma Import (C, Get_Temp_Name, "mkstemp"); - begin - Name := "GNAT-XXXXXX" & 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 := Get_Temp_Name (Name'Address); - end Create_Temp_File; - - ----------------- |