anchor.diff:    public
       constructor Create(awin: TfpgWindowBase); override;
       destructor  Destroy; override;
  +    procedure   CopyRect(ADest_x, ADest_y: TfpgCoord; ASrcCanvas: TfpgCanvasBase; var ASrcRect: TfpgRect); override;
     end;
   
   
  
positive.code:   inherited Destroy;
  end;
  
  procedure TfpgX11Canvas.DoBeginDraw(awin: TfpgWindowBase; buffered: boolean);
  var
    x: integer;
  
negative.code:       Trunc(64 * a1), Trunc(64 * a2));
  end;
  
  procedure TfpgX11Canvas.DoDrawPolygon(Points: PPoint; NumPts: Integer;
    Winding: boolean);
  var
    PointArray: PXPoint;
    i: integer;
  