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