Source position: cairo.pp line 537
procedure cairo_set_source(
cr: Pcairo_t;
source: Pcairo_pattern_t
);