xref: /dports/lang/gcc48/gcc-4.8.5/gcc/testsuite/gnat.dg/source_ref1.adb

pragma Source_Reference (3, "p1.adb");

procedure Source_Ref1 is
begin
   null;
end;