Димыч писал(а):
http://oberonrevival.sourceforge.net/docs/xds/html/isom202.html#6 и
http://oberonrevival.sourceforge.net/docs/xds/html/isom205.html#438Этот кусок получился на Модуле.
XDS поддерживает смешение языков внутри одного модуля.
Я старался следить за тем, чтобы везде было "#", но, видимо, проглядел
Должно быть IF n # 0 THEN …
Гм. Т.е. без директив и прочего? Потому как расширение у файла .ob2, директив компилятору нигде не дадено (более того, вначале модуля имеем <* +O2EXTENSIONS *>, что однозначно указывает на оберон).
Такое ощущение, что товарисчи из Excelsior'a взяли, да скрестили оберон с модулой, т.е. объединили их синтаксис. Интересно было бы посмотреть на этот EBNF

Да, применение <> я также обнаружил в Minimal.ob2, AggRendererOutlineAA.ob2, AggRasterizerCellsAA.ob2.
В AggBasics.ob2 обнаружил функцию:
Код:
PROCEDURE agg_power*(base, exponent: double): double;
BEGIN
RETURN base ** exponent;
END agg_power;
Зачем она нужна?
Также обнаружил горстку ассемблерных вставок в том же злополучном AggBasics.ob2. Без них совсем никак?