with task_set; use task_set;
with ada.strings.unbounded;
use ada.strings.unbounded;
with unbounded_strings;
use unbounded_strings;


package priority_assignment.rm is

   procedure Set_Priority_According_To_Rm
      (My_Tasks       : in out Tasks_Set;
      Processor_Name : in Unbounded_String := empty_string);

end priority_assignment.rm;