TFunctionContext

type TFunctionContext = class(TConvertContext)

public

  LocalVars: TFCLocalVars;

  ThisVar: TFCLocalIdentifier;

  IntfElReleases: TFPList;

  ResultNeedsIntfRelease: Boolean;

  IntfExprReleaseCount: Integer;

  BodySt: TJSElement;

  TrySt: TJSTryFinallyStatement;

  FinallyFirst: TJSStatementList;

  FinallyLast: TJSStatementList;

  constructor Create(); override;

  destructor Destroy; override;

  function AddLocalVar();

  function AddLocalJSVar();

  procedure Add_InterfaceRelease();

  function CreateLocalIdentifier(); virtual;

  function ToString; override;

  function GetLocalName(); override;

  function IndexOfLocalVar();

  function FindLocalVar();

  function FindPrecompiledVar();

  procedure DoWriteStack(); override;

end;

TFunctionContext

TConvertContext

TObject