Explorar el Código

pastojs: skip specialized methods in RTTI, #39268

mattias hace 2 años
padre
commit
7228b558dd
Se han modificado 1 ficheros con 2 adiciones y 0 borrados
  1. 2 0
      packages/pastojs/src/fppas2js.pp

+ 2 - 0
packages/pastojs/src/fppas2js.pp

@@ -21239,6 +21239,8 @@ begin
         begin
         begin
         if aResolver.GetProcTemplateTypes(TPasProcedure(P))<>nil then
         if aResolver.GetProcTemplateTypes(TPasProcedure(P))<>nil then
           continue; // parametrized functions cannot be published
           continue; // parametrized functions cannot be published
+        if (P.CustomData as TPas2JSProcedureScope).SpecializedFromItem<>nil then
+          continue; // specialized function cannot be published
         NewEl:=CreateRTTIMemberMethod(Members,i,MembersFuncContext);
         NewEl:=CreateRTTIMemberMethod(Members,i,MembersFuncContext);
         end
         end
       else if C=TPasProperty then
       else if C=TPasProperty then