let _GLX_ACCUM_RED_SIZE          = GetConf.GLX_ACCUM_RED_SIZE,          (fun (v : _a) -> (Obj.magic v : uint))