Source position: CFRunLoop.pas line 387
procedure CFRunLoopAddSource(
rl: CFRunLoopRef;
source: CFRunLoopSourceRef;
mode: CFStringRef
);