blob: ffccca8779f1648ef125a8c5da3b7cfb07701df9 [file] [log] [blame]
-- { dg-do compile }
-- { dg-options "-gnata" }
package body Tagged5 is
procedure Dummy is null;
end Tagged5;