testlist <- list(x_ = c(6.00308861146645e-273, -2.82039242375515e-54, 7.66487253347467e+187,  9.67837915074977e-272, -1.11008375881445e+108, -1.52972065151979e+147,  -6.45204894105758e+222, -3.14632195112665e-70, 9.34027992037101e+200,  4.81184929729124e-84, 2.32986021774735e-179, -5.5125264118526e-274,  2.75719052080711e-210, -3.62564871894109e+90, 1.80262932279125e-142,  -7.45854199106993e-200, 6.0816788552797e+196, 7.68193529701972e-146,  997657304132.357, -1.0958519970216e+279, 1.7962233256527e-105,  7590752.90857842, 2.07064075179969e-251, -2.34407930591538e+250,  4.96212195597363e-71, -3.29036739785252e+227, -2.05872587605868e-21,  -2.49365787624314e+90, 6.68617806941049e+204, 3.25682004060598e+97,  -7.74429455863345e+94, 4.30506246654932e-205, -1.86223437603027e-147,  9.85210025720995e+306, -2.02625366567678e-78, 7.07000726172341e+131,  NA, -4.12206441926577e-239, 2.02750991221225e-50, NA, -3.30205175757202e-106,  -2.02917106516307e+170, -1.01590909437342e+111, -1.26613529597825e-216,  -9.61020727488059e-79, 6.3665588735084e+68, -5.44638072772246e-71,  -5.41919008944781e-245, NA, 1.4587984458682e-282, 2.08515532117354e-274,  -2.46147166189335e-229, 7.83762321082321e-112, -2.02917106516307e+170,  -9.76896321522182e-127, -3.68074204762539e+148, -1.13090690771182e-160,  -5.67521434958419e+162, -5.84968142194216e+45, 3.74456028715595e-135,  8.45117745890506e-24, 2.36369101927454e+130, -2.36179756021407e+123,  2.02876356886527e+177, 0))
result <- do.call(ffstream:::computeStdNormCdf,testlist)
str(result)