
-- PERFORMANCE MEASUREMENT : procedure call and return time
--                           procedure in package
--                           one "in out" parameter

package Proc_Package_7 is
    procedure Proc_0 (A : in out Integer);
end Proc_Package_7;