Sign in
gnu
/
gcc.git
/
refs/heads/master
/
.
/
gcc
/
testsuite
/
algol68
/
compile
/
error-label-after-decl-1.a68
blob: 670f8908af1c0d34ea4e3d22777b1458d796d3e1 [
file
]
# { dg-options "-fstropping=upper" } #
BEGIN
GOTO
end
;
ASSERT
(
FALSE
);
end
:
0
;
INT i
=
10
;
# { dg-error "declaration cannot follow" } #
i
END