Выделено: viewtopic.php?p=39016#p39016Geniepro писал(а):
upd. Только что попытался проверить в BB 1.2 -- не компилируется...
Я не много изменил Ваш тест и обнаружил интересную, как мне кажется, особенность ВВ 1.5. Существует зависимость появления ошибки в редакторе от количества табуляций. Скопирую оба варианта, но при воспроизведении ее на другой машине результат, скорее всего, будет иной. Даже набирая комментарии потом сложно найти этот переход.
С ошибкой в строке L2: StdLog.Int(y)
Код:
MODULE GotoTest;
IMPORT StdLog;
PROCEDURE Go*;
VAR x, y : INTEGER;
LABEL L1;
LABEL L2;
BEGIN
x := 0;
y := 0;
L1: StdLog.Int(x);
INC(x);
GOTO L1;
L2: StdLog.Int(y);
INC(y);
GOTO L2;
END Go;
END GotoTest.
Без ошибки
Код:
MODULE GotoTest;
IMPORT StdLog;
PROCEDURE Go*;
VAR x, y : INTEGER;
LABEL L1;
LABEL L2;
BEGIN
x := 0;
y := 0;
L1: StdLog.Int(x);
INC(x);
GOTO L1;
L2: StdLog.Int(y);
INC(y);
GOTO L2;
END Go;
END GotoTest.
Еще, может быть, импорт модуля SYSTEM изменит картину в какую-нибудь сторону.