Browse Source

Handle executable extension for WASI OSes

Pierre Muller 4 months ago
parent
commit
39a3f5a678
1 changed files with 3 additions and 0 deletions
  1. 3 0
      packages/fpmkunit/src/fpmkunit.pp

+ 3 - 0
packages/fpmkunit/src/fpmkunit.pp

@@ -315,6 +315,7 @@ Const
   DLLExt  = '.dll';
   DLLExt  = '.dll';
   AIXSharedLibExt = '.a';
   AIXSharedLibExt = '.a';
   ExeExt  = '.exe';
   ExeExt  = '.exe';
+  WasiExeExt  = '.wasm';
   DbgExt  = '.dbg';
   DbgExt  = '.dbg';
   ZipExt  = '.zip';
   ZipExt  = '.zip';
   FpmkExt = '.fpm';
   FpmkExt = '.fpm';
@@ -2958,6 +2959,8 @@ function AddProgramExtension(const ExecutableName: string; AOS : TOS): string;
 begin
 begin
   if AOS in [Go32v2,Win32,Win64,Wince,OS2,EMX,Watcom] then
   if AOS in [Go32v2,Win32,Win64,Wince,OS2,EMX,Watcom] then
     Result:=ExecutableName+ExeExt
     Result:=ExecutableName+ExeExt
+  else if AOS in [wasip1,wasip1threads,wasip2] then
+    Result:=ExecutableName+WasiExeExt
   else
   else
     Result:=ExecutableName;
     Result:=ExecutableName;
 end;
 end;