Компилятор Oberon-07/11 для x86 Windows

[akron1]

akron1, один знакомый оберонщик попросил уточнить насчёт лицензии на данный компилятор. Он опасается, что если её сейчас нет никакой, то потом ВДРУГ может появиться совсем неудобная (для его нужд).

О лицензии не задумывался... Ну ладно, значит будет GNU GPL со следующей версии.

[Geniepro]

Лучше сделайте BSD или вообще Public Domain (как у SQLite).
С GPL проблемы возникают в коммерческом использовании.

[valexey_u]

Лучше сделайте BSD или вообще Public Domain (как у SQLite).
С GPL проблемы возникают в коммерческом использовании.

Нет. GPL коммерческому использованию никак не мешает, ну, например у нас в конторе для создания сильно коммерческого продукта используется gcc (а у него лицензия как бы вообще GPLv3), и mono (лицензия GPL). А еще используется OpenJDK (GPL).

Тут не нужно путать компилятор и рантайм языка. Рантайм (равно как и стандартная либа) должен быть под лицензией аля LGPL или там GPL+linking exception.

Единственное чему может помешать лицензия GPL у компилятора - это проприентарным модификациям лицами не являющимися авторами данного компилятора.

[Geniepro]

Единственное чему может помешать лицензия GPL у компилятора - это проприентарным модификациям лицами не являющимися авторами данного компилятора.

Я это и имел в виду -- ведь для реального использования оберона его компилятор или RTL по-любому придётся допиливать...

[valexey_u]

Единственное чему может помешать лицензия GPL у компилятора - это проприентарным модификациям лицами не являющимися авторами данного компилятора.

Я это и имел в виду -- ведь для реального использования оберона его компилятор или RTL по-любому придётся допиливать...

Не вижу тут смысла не GPL лицензии -- допиленный компилятор в исходниках должен быть доступен всем, в том числе и первоначальному автору (akron1). См. как развивается тот же gcc.

[akron1]

Переписал редактор на обероне. Исходный код получился страшный -- я никогда раньше не писал GUI на winapi, к тому же сильно мешало отсутствие вшитой в язык поддержки юникода (в моей реализации) и отсутствие в языке операции конкатенации (не говоря уж о типе string). Но каким-то образом оно работает)). Немного расширил и доопределил язык. Усовершенствовал работу с вещественными числами. До промышленных компиляторов, конечно все равно далеко, но все-таки вещественная арифметика стала в несколько раз эффективнее. https://sites.google.com/site/oberon07compiler/versii

[Kemet]

Код: [Выделить]

sys.ADR(s)Труъоберонщики могут за это забить ногами ))
В данном случае значения не имеет, но лучше писать

Код: [Выделить]

sys.ADR(s[0])в будущем при расширении будет меньше проблем.

[Geniepro]

Переписал редактор на обероне. Исходный код получился страшный -- я никогда раньше не писал GUI на winapi, к тому же сильно мешало отсутствие вшитой в язык поддержки юникода (в моей реализации) и отсутствие в языке операции конкатенации (не говоря уж о типе string). Но каким-то образом оно работает)).

Серьёзный шаг вперёд в проекте. Теперь осталось сделать библиотеку визуальных компонентов и прикрутить редактор форм -- может получиться не хуже чем в дельфях ))

[satan]

В компиляторе небольшой косяк с форматом PE файла (где не разобрался ещё), при создании гуя антивирусник (Symantec Endpoint) удаляет файл как потенциально опасный. Такое было у меня, когда накосячил с размерностью полей структур.

[valexey_u]

Такс. А я чего-то не понял. Вот есть функция:

Код: [Выделить]

RegisterClassEx: PROCEDURE [winapi] (lpWndClass: tagWNDCLASSEX): sys.CARD16;

То есть именно функция, а не процедура.

А вот есть её вызов (в Editor'e):

Код: [Выделить]

RegisterClassEx(wc);

Насколько я понимаю, вызов не чистой процедуры (то есть функции) в виде Statement'a в Oberon'e запрещен, вызов таковой функции может быть только в составе expression'a.

Или я не прав?

[Kemet]

Данная особенность описана в документации:

Системные флаги
 
  При объявлении процедурных типов и глобальных процедур, после ключевого слова
PROCEDURE может быть указан системный флаг соглашения вызова.
Его формат: "[" ( "stdcall" | "cdecl" | "winapi" ) "]", то есть [stdcall], [cdecl] или [winapi]. Например:
 
PROCEDURE [cdecl] MyProc(x, y, z: INTEGER): INTEGER;
 
  Если указан флаг [winapi], то принимается соглашение stdcall и процедуру-функцию
можно вызвать как собственно процедуру, вне выражения. Флаг [winapi] доступен только для
платформы Windows.

[valexey_u]

Биндинг к SDL еще никто не пробовал сделать для этого компилятора?

[akron1]

Хм... Могу попробовать. Все равно заняться в плане кодирования нечем -- новый кодогенератор и сборщик мусора пока делать не хочу.
А пока, изменений немного: улучшена поддержка Kolibri (dll, библиотеки, улучшена работа с динамической памятью), несколько увеличена скорость компиляции и плотность кода и некоторые мелкие поправки.
https://sites.google.com/site/oberon07compiler/versii

[ilovb]

akron1, сделайте, пожалуйста, для своего детища репозиторий на гитхабе.

[akron1]

Извините, Борис, но гитхабом пользоваться не умею и учиться не хочу, потому что мне это не нужно -- я не кодер и не собираюсь им быть.