gcc/testsuite/gnat.dg/specs/linker_alias.ads

   1 -- { dg-do compile }
   2 -- { dg-skip-if "missing alias support" { *-*-darwin* hppa*-*-hpux* } }
   3
   4 package Linker_Alias is
   5
   6    Var : Integer;  -- { dg-error "aliased to undefined symbol" }
   7    pragma Export (C, Var, "my_var");
   8    pragma Linker_Alias (Var, "var2");
   9
  10 end Linker_Alias;