1 2 3 4 5 6
package Opt15_Pkg is procedure Trace_Inlined; pragma Inline (Trace_Inlined); end Opt15_Pkg;