s-fileio.adb (Temp_File_Record): Change length of string component Name from L_tmpnam + 1 to max_path_len + 1.

* s-fileio.adb (Temp_File_Record): Change length of string component
	Name from L_tmpnam + 1 to max_path_len + 1.

From-SVN: r92850
This commit is contained in:
Arnaud Charlet 2005-01-03 16:41:53 +01:00
parent da709d08b9
commit b558cbe01b
1 changed files with 1 additions and 1 deletions

View File

@ -60,7 +60,7 @@ package body System.File_IO is
type Temp_File_Record_Ptr is access all Temp_File_Record;
type Temp_File_Record is record
Name : String (1 .. L_tmpnam + 1);
Name : String (1 .. max_path_len + 1);
Next : Temp_File_Record_Ptr;
end record;
-- One of these is allocated for each temporary file created