Есть модуль с условной компиляцией unit uUnit; interface uses {$IFDEF U1}uUnit1{$ELSE}uUnit2{$ENDIF};

Question

Есть модуль с условной компиляцией unit uUnit; interface uses {$IFDEF U1}uUnit1{$ELSE}uUnit2{$ENDIF};

type
{$IFDEF U1}
TMyType = TTypeFromUnit1;
{$ELSE}
TMyType = TTypeFromUnit2;
{$ENDIF}

function MyFunc: TMyType; inline;

После билда мне показывается подсказка:

[dcc32 Hint] uPrgProcs.pas(725): H2443 Inline function 'MyFunc' has not been expanded because unit 'uUnit1' is not specified in USES list

Выходит, что для того, чтобы функция заинлайнилась в модуле uPrgProcs,
я там должен в uses добавить либо uUnit1, либо uUnit2 либо вслю строку
с условным выбором {$IFDEF U1}uUnit1{$ELSE}uUnit2{$ENDIF};
Но в этом случае весь смысл теряется, т.к. делалось именно для того, чтобы указал uUnit в uses и всё.
Получается, что от инлайна придётся отказаться в этом случае?

#lazarus #programming #russian

0

08.03.2024

6 ответов

26 просмотров

Anton

1) в uses можно не под ifdef 2) можно использовать {$ifdef u1}uUnit1{$else}uUnit2{$endif}.MyType —- при этом типы называть внути разных юнитов одинаково.

0

2 месяца назад

Alex Egorov Автор вопроса

Anton
1) в uses можно не под ifdef 2) можно использовать...

В uses ifdef, чтобы не тащить обе кодовые базы в exe файл, которые большие

0

2 месяца назад

Anton

Alex Egorov
В uses ifdef, чтобы не тащить обе кодовые базы в e...

их линкер уберет. сам.

0

2 месяца назад