Не было отмечено, что вопрос закрыт 20161029.

Несогласованность устранена переопределением Locator.This. Обоснование втексте дельты B29.

Оригинальное определение:
> -- Цитата:
> PROCEDURE (l: Locator)  (IN path: ARRAY OF CHAR): LocatorNEW, ABSTRACTThis evaluates a relative path, starting from the location specified by l.Postresult # NIL	l.res = 0	no errorresult = NIL	l.res = 1	invalid name	l.res = 5	io error
Заменено на:
> -- Цитата:
> PROCEDURE (l: Locator)  (IN path: ARRAY OF CHAR): LocatorNEW, ABSTRACTThis evaluates a relative path, starting from the location specified by l.Postresult # NILresult.res = 0	legal locatorresult.res # 0	illegal locator