aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/algol68/execute/identity-declaration-1.a68
blob: ddfa8f28bcbd20b7c6165b9c46159cd8b50304e5 (plain)
1
2
3
4
5
6
# { dg-options "-fstropping=upper" }  #
BEGIN INT x := 10;
      REF INT xx = x := 20;
      ASSERT (xx = 20);
      SKIP
END