aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/algol68/compile/error-contraction-1.a68
blob: f2bce73ff176db21b3522b09905394893b1e11a0 (plain)
1
2
3
4
5
6
# { dg-options "-fstropping=upper" }  #

# Contracting mixed collateral variable and constant declarations is
  not allowed.
#
(INT foo = 100, bar := 200) # { dg-error "mixed" } #