Source position: shape.pp line 80
procedure XShapeCombineRectangles(
display: PDisplay;
dest: TWindow;
dest_kind: cint;
x_off: cint;
y_off: cint;
rectangles: PXRectangle;
n_rects: cint;
op: cint;
ordering: cint
);