diff --git a/src/fs-filo.ads b/src/fs-filo.ads
index b9e5742..fb836fc 100644
--- a/src/fs-filo.ads
+++ b/src/fs-filo.ads
@@ -5,14 +5,14 @@
 
 package FS.FILO is
 
-private
    type Partition_Length is range 0 .. Interfaces.Unsigned_64'Last;
 
-   function Part_Length return Partition_Length;
-
    type File_Length is range 0 .. int'Last; -- Should be higher, fix FILO first
    subtype File_Offset is File_Length range 0 .. File_Length'Last - 1;
 
+private
+   function Part_Len return Partition_Length;
+
    function File_Max return File_Length;
    procedure Set_File_Max (Len : File_Length);