anchor.diff:  begin
     ExpressionMethod := CallInheritedExpression;
     BuildExpressionTree(ExpressionMethod);
  +end;
  +
  +procedure TPasSyntaxTreeBuilder.SetCurrentCompoundNodesEndPosition;
  +begin
  +  TCompoundSyntaxNode(FStack.Peek).EndCol := Lexer.PosXY.X;
  +  TCompoundSyntaxNode(FStack.Peek).EndLine := Lexer.PosXY.Y;  
   end;
   
   procedure TPasSyntaxTreeBuilder.CallInheritedExpression;
  
positive.code: 
  procedure TPasSyntaxTreeBuilder.CompoundStatement;
  begin
    FStack.Push(FStack.Peek.AddChild(TCompoundSyntaxNode.Create(ntStatements)));
    try
      inherited;
      TCompoundSyntaxNode(FStack.Peek).EndCol := Lexer.PosXY.X;
      TCompoundSyntaxNode(FStack.Peek).EndLine := Lexer.PosXY.Y;
    finally
      FStack.Pop;
    end;
  
negative.code: 
  procedure TPasSyntaxTreeBuilder.AsmStatement;
  begin
    FStack.PushCompoundSyntaxNode(ntStatements).SetAttribute('type', 'asm');
    try
      inherited;
      SetCurrentCompoundNodesEndPosition;
    finally
      FStack.Pop;
    end;
  