blob: a09df7cf702df756c16c0a6fbc42040b533ed3bb [file] [log] [blame]
with Interfaces;
with Interfaces.C;
use Interfaces.C;
package FILO.FS is
type File_Type is (Dir, Regular, Link);
type File_Length is range 0 .. int'Last; -- Should be higher, fix FILO first
subtype File_Offset is File_Length;
private
function Part_Len return Partition_Length;
function File_Max return File_Length;
procedure Set_File_Max (Len : File_Length);
function File_Pos return File_Offset;
procedure Set_File_Pos (Off : File_Offset);
end FILO.FS;