package Parser is

   pragma Elaborate_Body;

   procedure Initialize (File : in String);

   procedure Iterate (Process : not null access
                        procedure (Student : String;
                                   Advisor : String;
                                   Place   : String;
                                   Date    : String));

end Parser;

