with Systems; use Systems; with Task_Set; use Task_Set; with Tasks; use Tasks; with Ada.Text_IO.Unbounded_IO; use Ada.Text_IO.Unbounded_IO; with Ada.Exceptions; use Ada.Exceptions; with Ada.Strings.Unbounded; use Ada.Strings.Unbounded; with unbounded_strings; use unbounded_strings; use unbounded_strings.strings_table_package; use unbounded_strings.unbounded_string_list_package; package result_parser is parser_error : exception ; Procedure parse_task_response_time( sys : in System;Processor_name : in Unbounded_String; input : in unbounded_string ; num_echeance: out Integer; Result: out Unbounded_String); Procedure parse_task_context_switch( sys : in System;Processor_name : in Unbounded_String; input : in unbounded_string ; Result: out Unbounded_String); Procedure parse_task_preemption( sys : in System;Processor_name : in Unbounded_String; input : in unbounded_string ; Result: out Unbounded_String); end result_parser;