Lines Matching defs:Alfa_Test

52 procedure Alfa_Test is  subprogram
53    Infile    : File_Type;
54    Name1     : String_Access;
55    Outfile_1 : File_Type;
56    Name2     : String_Access;
57    Outfile_2 : File_Type;
58    C         : Character;
60    Stop : exception;
63    Diff_Exec   : constant String_Access := Locate_Exec_On_Path ("diff");
64    Diff_Result : Integer;
83    Process : declare