PR testsuite/86649

[official-gcc.git] / gcc / testsuite / gnat.dg / weak2.ads

package Weak2 is

   Var : Integer;
   pragma Import (Ada, Var, "var_name");
   pragma Weak_External (Var);

   function F return Integer;

end Weak2;