paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-11 12:00:37 +01:00
Code Issues Packages Projects Releases Wiki Activity

codetools: fixed fpc include paths for wasi*

Browse Source
This commit is contained in:
mattias 2025-06-08 13:07:01 +02:00
parent d56c9f869c
commit 5f9c7632f5
1 changed files with 30 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
components/codetools/definetemplates.pas
View File

@ -3736,38 +3736,43 @@ end;
function GetDefaultSrcOSForTargetOS(const TargetOS: string): string;
begin
Result:='';
if (CompareText(TargetOS,'linux')=0)
or (CompareText(TargetOS,'freebsd')=0)
or (CompareText(TargetOS,'netbsd')=0)
or (CompareText(TargetOS,'openbsd')=0)
or (CompareText(TargetOS,'dragonfly')=0)
or (CompareText(TargetOS,'darwin')=0)
or (CompareText(TargetOS,'ios')=0)
or (CompareText(TargetOS,'solaris')=0)
or (CompareText(TargetOS,'haiku')=0)
or (CompareText(TargetOS,'android')=0)
then
Result:='unix'
else
if (CompareText(TargetOS,'win32')=0)
or (CompareText(TargetOS,'win64')=0)
or (CompareText(TargetOS,'wince')=0)
then
case lowercase(TargetOS) of
'linux',
'freebsd',
'netbsd',
'openbsd',
'dragonfly',
'darwin',
'ios',
'solaris',
'haiku',
'android':
Result:='unix';
'win32',
'win64',
'wince':
Result:='win';
'wasi',
'wasip1',
'wasip2',
'wasip1threads':
Result:='wasicommon';
end;
end;
function GetDefaultSrcOS2ForTargetOS(const TargetOS: string): string;
begin
Result:='';
if (CompareText(TargetOS,'freebsd')=0)
or (CompareText(TargetOS,'netbsd')=0)
or (CompareText(TargetOS,'openbsd')=0)
or (CompareText(TargetOS,'dragonfly')=0)
or (CompareText(TargetOS,'darwin')=0)
then
Result:='bsd'
else if (CompareText(TargetOS,'android')=0) then
case lowercase(TargetOS) of
'freebsd',
'netbsd',
'openbsd',
'dragonfly',
'darwin':
Result:='bsd';
'android':
Result:='linux';
end;
end;
function GetDefaultSrcCPUForTargetCPU(const TargetCPU: string): string;