PowerAda 70
From OC Systems Wiki!
(70) The value of Buffer_Size in Storage_IO.
See A.9(10).
From Ada.Storage_IO:
Buffer_Size :
CONSTANT System.Storage_Elements.Storage_Count :=
System.Storage_Elements.Storage_Count
((Element_Type'Size + System.Storage_Unit - 1) /
System.Storage_Unit);