FreePascal.ru

Без cmem та же проблема, смотрел на флажок NeedLock менеджера памяти - выставлен в False. Флажок менял, менеджер памяти на свой с критическими секциями заменял, но всё бестолку рандомно проскакивает ошибка:
malloc: *** error for object 0x1: Non-aligned pointer being freed
*** set a breakpoint in ...

Стало полегче, но периодически всё равно проскакивают падения с ошибками.
Программа может одновременно работать с десятками потоков каждый из которых выделяет и высвобождает память.

Потоки создаются при помощи BeginThread, в uses основного dpr модуля объявлены {$IFDEF DARWIN}cthreads, cmem, heaptrc,{/$ENDIF}
Проблема в том, что созданный поток использует и высвобождает память выделенную в основном потоке. В Windows всё работает как часы, в MacOS падает. Какие тонкости менеджера ...

Какая жаль. Спасибо за инфу, буду копать в этом направлении )

program test;
begin
Writeln('Hello World!');
end.
FPC 2.4.0
Компилирую с флагами: -Mobjfpc -Sd -O3 -CX -XX
Получаю 91кб исполняемый с кучей мне абсолютно не нужного хлама вида:
..._SYSTEM_INDEXBYTE$formal$LONGINT$BYTE$$LONGINT _SYSTEM_INDEXWORD$formal$LONGINT$WORD$$LONGINT... а также кучей ...

carrots, не вписываются в общую эстетику кода )

carrots, говорю же, не нужны мне классы, оно сейчас на них и реализовано )

debi12345, ну тут даже не в миниатюрности дело, просто всюду используются чистые объекты и TXML выбивался бы из общего стиля )
Но XML парсер весьма легковесный получился, и не хотелось бы вместо XML['mode']['mesh'].Content городить нечто вроде XML['model']^['mesh']^.Content )

Как раз, хочется именно чистых объектов без рюшек классовых )

Звиняйте что ввёл в заблуждение, но я наткнулся на неприятную особенность:
TXML = object
private // или public, не важно
XML : array of TXML;
end; Если убрать private, то всё успешно компилируется, в противном случае - "Type 'TXML' is not yet completely defined". Это только в Delphi, в FPC по ...

Оно не скомпилируется. FPC и Delphi этого не допускает. Но в Delphi есть record с методами, с которым это прокатит, хочется аналог в FPC найти.

Имеется желание сделать вот так:
Очень хотелось бы реализовать это без классов и побочных PXML, которые в objfpc режиме требуют обязательного указания ^ :)
Delphi позволяет творить подобное с record структурами.
Решаема ли задача при таких условиях? )

Дык, не хотелось бы при этом где-то в коде вызывать что-то типа TMyProcedure(IMyInt.VMTable[idx]) :)

Возможно ли каким-нибудь хаком задать индекс метода интерфейса по типу того что делает dispid?
Сама задача: имеется описание интерфейса с доброй сотней методов, а нужна лишь пара из них, и совсем не хочется тянуть за собой описание всего интерфейса :)