TTSContext

type TTSContext = class(TObject)

protected

  procedure TypesToMap; virtual;

public

  constructor Create();

  destructor Destroy; override;

  procedure DoGlobalFree();

  procedure AddAliases();

  procedure PushScope();

  procedure PopScope();

  function ResolveTypeRef();

  function GetTypeName();

  function FindInNodes();

  function FindInScope();

  function FindTypeDef();

  function FindTypeAlias();

  procedure AddToTypeMap();

  procedure RemoveFromTypeMap();

  property TypeMap: TFPObjectHashTable; [r]

  property CurrentScopeIdx: Integer; [r]

  property CurrentScope: TJSSourceElements; [r]

  property CurrentForwards: TStringList; [r]

end;

TTSContext

TObject