RosettaCodeData/Task/Scope-Function-names-and-labels/ALGOL-68/scope-function-names-and-labels.alg
2023-07-01 13:44:08 -04:00

12 lines
169 B
Text

IF PROC x = ...;
...
THEN
# can call x here #
PROC y = ...;
...
GO TO l1 # invalid!! #
ELSE
# can call x here, but not y #
...
l1: ...
FI