testlist <- list(h = -2.04267810923204e-259, l = c(-2.42544762145207e+191,  1.12355407604939e-05, -1.32629757910035e+126, -2.11584853399821e+221,  -6.68811291599819e+229, 4.27172609140276e+105, -3.05734588829833e-274,  3.43532829439179e-212, 1.87956046905601e-237, 1.14672232236186e+237,  1.00533104774318e+140, -821870952.931623, -6.73201406499197e+252,  2.50195192167909e+284, 1.03580070342627e-275, -1.30728104487927e-56,  1.84391853541745e+155, -5.75634067247175e+268, -5.61333196695187e+97,  NaN, 5.60254655797989e+35, -1964458687028586752, 6.0763914834651e-100,  -Inf, -1.93918204476049e+186, 8.83620916401034e+128, 5.54502840365157e-294,  -3.12871549531678e-155, -Inf, 5.35876994958598e+156, 0), y = structure(c(1.23400230354758e+180,  8.47193571137835e-280, 2.22910154605601e+222, 2.00852929770089e+258,  4.49052331565348e-82, 1.5904861968372e+90, 1.00294100451712e-212,  2.27953776951935e-162, 1.78225049811652e+264, 2.43935549983406e-135,  1.39452366307945e-154, 9.01901726458073e-245, 2.07951307573967e+145,  4.98245111193021e+177, 5.6224680565862e+106, 1.46117346252669e+245,  8.24360496847784e-190, 8.72389613377481e+196, 1.10757244388812e+223,  4.22648879579991e+183, 9.80846287081605e-99, 1.2102890218932e+294,  4.09566833668484e+55, 1.74983550094194e-54, 1.36263687306271e-303,  1.73080068286536e+222, 1.91826767519082e-104, 8.17473074454399e+157,  5.08842560763658e+263, 7.42444057922648e+74, 2.20796544725575e-72,  4.55219551697226e-30, 5.90178275754209e+174, 3.95033504280379e-240,  4.91820604666523e-32, 2.31671664208171e+210, 4.62535848834927e+264,  4.51488578985397e-210, 3.69394917967617e-97, 1.90112585089277e-237,  2.12287877839272e+99, 4.55093725456263e+263, 4.84033530903411e+125,  5.14584676593984e+20, 1.49410338642628e+206, 2.95953107951463e+76,  1.10523355862614e-235, 1.60444121400752e-44, 1.27005400036886e+230,  8.27974193894679e-38, 8.42798891871834e-304, 7.11475944053888e+42,  1.55086199063981e-249, 3.06981933644067e-260), .Dim = c(6L, 9L )), z = c(1.46768183944538e+242, 3.92495163876183e-222, -3.69176738999682e-156,  -8.81437413413266e+215, 2.53162219623531e-69, 1.79490302992225e+73,  5.30931078824883e-27, -2.53490646882013e-296, 2.69270254209333e-194,  2.34415974435885e+191, -5.59641499593708e-78, Inf, 1.85186335541591e-197,  -8.75399687236841e+149, 4.17733880714957e+133, -1.43859971255944e-196,  6.82624361572626e-221, 6.06817441473902e-71, 3.75669144435427e+248,  -1.6359131218683e+74, -2.5000356271785e-276, 3.07545213904143e+153,  -7.38250312300592e-39, -4.29915113829833e+129, -8130054327363629056,  9.15266323706559e+280, -Inf, -5.50878390388493e-06, 8.30793790858418e-70,  1.30992490042279e+46, -2.10579652372192e-220, -5.51856070699436e-198,  -5.61307001683154e+50, 4.05821686121638e-196, -Inf, -1.75333321054844e+26,  NaN, Inf, -9.35700207898989e+151, -7.18038081417808e+250, -7.15410608356036e-119,  0))
result <- do.call(cgAUC:::c_cntin,testlist)
str(result)