package Preferences is
procedure Initialize( filename : String );
procedure Finalize;
function Get_Pref( name : String ) return Boolean;
function Get_Pref( name : String ) return Float;
function Get_Pref( name : String ) return Integer;
function Get_Pref( name : String ) return String;
function Get_Pref( section, name : String ) return Boolean;
function Get_Pref( section, name : String ) return Float;
function Get_Pref( section, name : String ) return Integer;
function Get_Pref( section, name : String ) return String;
procedure Set_Pref( name : String; value : Boolean );
procedure Set_Pref( name : String; value : Float );
procedure Set_Pref( name : String; value : Integer );
procedure Set_Pref( name : String; value : String );
procedure Set_Pref( section, name : String; value : Boolean );
procedure Set_Pref( section, name : String; value : Float );
procedure Set_Pref( section, name : String; value : Integer );
procedure Set_Pref( section, name : String; value : String );
procedure Set_Default( name : String; value : Boolean );
procedure Set_Default( name : String; value : Float );
procedure Set_Default( name : String; value : Integer );
procedure Set_Default( name : String; value : String );
procedure Set_Default( section, name : String; value : Boolean );
procedure Set_Default( section, name : String; value : Float );
procedure Set_Default( section, name : String; value : Integer );
procedure Set_Default( section, name : String; value : String );
end Preferences;