OberonCore

При вызове Блэкбоксом функций из DLL-файла, скомпилированного XDS, идут ошибки при использовании в них динамической памяти.
У кого-нибудь есть опыт в работе BlackBox с XDS?

Вообще говоря, 1) если DLL XDS собрана правильно, то ей все равно, откуда ее используют.
С другой стороны, 2) Блэкбоксу тоже глубоко все равно, чью DLL использовать.
Значит, если 1) соблюдено, то дело в том, КАК организовано взаимодействие и что туда передается. Нужен контекст - что и как вызываете...

Так если не использовать в XDS оператор NEW, то все отлично работает ...

Модуль Test.ob2


Проект XDS


Модуль импорта BlackBox


Модуль использования

Проблема однозначно в DLL. Если все собрано верно, то скорее всего, не выполняется какая-то необходимая инициализация. В документации XDS ничего не сказано относительно необходимости вызывать какую-то инициализационную функцию при начале использования DLL? (хотя есть стандартный способ для DLL инициализироваться при загрузке, но у него вроде бы есть некие недостатки, из-за которых они могли предпочесть явный вызов).
А из других языков/сред использовать DLL пробовали? Например, из Дельфы?

Попробовал в Delphi. Работает...

А какого рода ошибки идут? Как это проявляется?

Ошибка: NIL dereference (read) в StdInterpreter.CallProc.

Попробовал вызывать эту DLL из сишной программы -- тоже вылетает с ошибкой. Такчто проблема с XDS, а не BlackBox.

В смысле попробовал аналогичную DLL, созданную в Delphi, вызывать из BlackBox.

А, так бы и говорили, а я думал - пробовали XDS-DLL из Дельфи!

Если NIL dereference (READ), то это значит, что функция с таким именем в DLL не найдена - и указатель на точку входа в нее нулевой.

Возможно, здесь проблема с именованием процедуры. Для StdCall-DLL есть соглашение о том, что имя, под которым экспортируется, "коверкается" суффиксом @размер_параметров_в_байтах.

Но Блэкбокс должен бы это учитывать... Ведь в исходнике WinApi явно имена с @ не указываются. Или может быть, API-функции не имеют этого суффикса?
Или наоборот - ББ учитывает, а вот XDS не добавляет суффикса?

Попробуйте посмотреть таблицу экспорта DLL каким-нибудь PE-браузером. Или даже проще всего - ФАРом, найдите имя вашей процедуры - есть там собачка в конце с числом?

В Dependency Walker имя функции "Sum" без всяких значков.
Тут дело, кажется, не в этом. Если в функции не использовать динамический массив, то всё работает.

Разобрался.
В модуле нужно указать <*+MAIN*>, тогда можно работать с динамической памятью.
Если динамическая память не используется, то можно <*+MAIN*> и не указывать.
В документации об этом нигде явно не сказано

Продолжение проблемы...
Если использовать достаточно большие динамические массивы, то приходится вручную
вызывать сборщик мусора oberonRTS.Collect, иначе после нескольких запусков
через коммандер BlackBox вылетает без каких-либо сообщений.
А при ещё больших массивах BlackBox вылетает и при первом запуске

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

Однако диспетчер Блэкбокса может работать в двух режимах - в буйном (по умолчанию) и в мирном (когда он сам внутри DLL). Так вот, можно форсировать второй режим - перекомпилируйте Kernel, заменив в нем в секции инициализации

"dllMem := inDll" на "dllMem := TRUE".

Возможно, после этого они сживутся с XDS.

На том массиве, где раньше вылетал, теперь при первом запуске нормально работает, при втором -- ругается illegal memory read, при третьем -- вылетает.
Но теперь даёт ошибку или вылетает на меньших массивах при каждом n-ном запуске.