From 925dc4bc7562394c8ea56c3b597c33b0051c551e Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 12 Feb 2022 21:13:41 +0100
Subject: [PATCH] fcl-js: fixed compile with pas2js

---
 packages/fcl-js/src/jstree.pp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/packages/fcl-js/src/jstree.pp b/packages/fcl-js/src/jstree.pp
index 0c8f5f0fa7..73f6e73542 100644
--- a/packages/fcl-js/src/jstree.pp
+++ b/packages/fcl-js/src/jstree.pp
@@ -3543,7 +3543,7 @@ end;
 
 { TJSFunction }
 
-destructor TJSFunctionDeclarationStatement.Destroy;
+destructor TJSFunctionStatement.Destroy;
 begin
   FreeAndNil(FFuncDef);
   inherited Destroy;
@@ -3607,7 +3607,7 @@ Var
 begin
   FParams.Clear;
   For I:=0 to TypedParams.Count-1 do
-    FParams.Add(UTF8Encode(TypedParams.Names[i]));
+    FParams.Add({$ifdef FPC_HAS_CPSTRING}UTF8Encode(TypedParams.Names[i]){$ELSE}TypedParams.Names[i]{$ENDIF});
 end;
 
 { TJSBracketMemberExpression }