Source position: gmain.inc line 129
procedure g_source_set_callback(
source: PGSource;
func: TGSourceFunc;
data: gpointer;
notify: TGDestroyNotify
);