1package body Task1_Pkg is
2   task body Typ_Task is
3   begin
4      loop
5         null;
6      end loop;
7   end Typ_Task;
8
9begin
10   null;
11end Task1_Pkg;
12