aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/algol68/execute/identity-declaration-3.a68
blob: a694c3a640efaa7eeeca8758fa20e351bd9209c4 (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