From 743ee3685950103a3d27392975dc58f1fd2df8c0 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Thu, 11 Jan 2024 14:55:24 +0100
Subject: [PATCH] releasecreator: put second libpas2js into sub folder

---
 tools/releasecreator/Pas2jsReleaseCreator.lpr | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/tools/releasecreator/Pas2jsReleaseCreator.lpr b/tools/releasecreator/Pas2jsReleaseCreator.lpr
index d6b8ff7..6924fca 100644
--- a/tools/releasecreator/Pas2jsReleaseCreator.lpr
+++ b/tools/releasecreator/Pas2jsReleaseCreator.lpr
@@ -463,7 +463,7 @@ end;
 
 procedure TPas2jsReleaseCreator.BuildTools(const TargetOS, TargetCPU: string);
 var
-  WorkDir, SrcCompilerDir, PkgSrcDir, UnitOutDir: String;
+  WorkDir, SrcCompilerDir, PkgSrcDir, UnitOutDir, CurBinDir: String;
   SharedParams, TheParams: TStringList;
 begin
   SharedParams:=TStringList.Create;
@@ -506,10 +506,12 @@ begin
 
     if FPC2Filename<>'' then begin
       // compile second libpas2js
+      CurBinDir:=BuildDir_Bin+FPC2TargetCPU+'-'+FPC2TargetOS+PathDelim;
+      ForceDir(CurBinDir,'sub folder for second libpas2js');
       TheParams.Assign(SharedParams);
       if SameText(FPC2TargetOS,'linux') then
         TheParams.Add('-fPIC');
-      TheParams.Add('-o'+BuildDir_Bin+'libpas2js-'+FPC2TargetCPU+'-'+FPC2TargetOS+GetLibExt(TargetOS));
+      TheParams.Add('-o'+CurBinDir+'libpas2js'+GetLibExt(TargetOS));
       TheParams.Add('-P');
       TheParams.Add(FPC2TargetCPU);
       TheParams.Add('-T');
@@ -736,6 +738,7 @@ end;
 
 procedure TPas2jsReleaseCreator.ForceDir(Dir, DirTitle: string);
 begin
+  Dir:=ChompPathDelim(Dir);
   if DirectoryExists(Dir) then exit;
   if Simulate then exit;
   if ForceDirectories(Dir) then exit;