Source position: shape.pp line 142
function XShapeInputSelected(
display: PDisplay;
window: TWindow
):culong;