Source position: xkb.pp line 1846
function XkbGeomColorIndex(
g: PXkbGeometryPtr;
c: PXkbColorPtr
):LongInt;