1 2 3 4 5 6 7
with Lto18_Pkg; use Lto18_Pkg; package Lto18 is procedure Proc (Driver : Rec); end Lto18;