1package pkg is 2 procedure proc; 3end package; 4 5package body pkg is 6 procedure proc is 7 begin 8 report "Hello"; 9 end procedure; 10end package body; 11 12------------------------------------------------------------------------------- 13 14-- use work.pkg.proc; Put use clause here and it will work 15 16package other_pkg is 17 procedure calling_proc; 18end package; 19 20use work.pkg.proc; 21 22package body other_pkg is 23 procedure calling_proc is 24 begin 25 proc; 26 end procedure; 27end package body; 28 29------------------------------------------------------------------------------- 30 31use work.other_pkg.calling_proc; 32 33entity issue186 is 34end entity; 35 36architecture a of issue186 is 37begin 38 main : process 39 begin 40 calling_proc; 41 wait; 42 end process; 43end architecture; 44