testlist <- list(x = c(-2.15125016271534e+244, 6.90358501897187e-189, 8.53510522205566e+40,  -2.11608220844914e-286, 1.49502318067595e-80, 2.76932739972246e-111,  9.85767125196701e+119, -1.22173618763461e+54, -2.25867464534669e+73,  -99279963.9237618, 3.16395718553144e+42, 7.26928186503983e+50,  -1.7545381372656e+183, 4.13252411068885e-50, 3.17562122814866e-266,  -4.49404944517475e+26, -4.69372564234344e-284, -1.95650740978466e+150,  4.9192455359132e-100, 4.13398982079388e-41, 1.47593949558121e-307,  -1.68909478837498e+213, -7.73530562822498e+29, -4.15095692804428e+106,  -5.75001969827932e+303, -6.59827200719133e+87, 3.77725216040665e+273,  -4.29330545822282e+272, 8.67179222242405e+52, -8.11851731874093e+210,  -9.33266222400132e+117, 1.54931168761796e-254, 6.62706755429315e-211,  -1.80983055907212e-203, 7.63919325389769e-56, 6.36583263778408e+28,  -6.97444436564259e+193, 7.59864052039603e-239, -5.73534102292299e-25,  6.41808611054397e-301, -6.61754516688387e+125, -5.5738699056341e+218,  8.77938405275381e+250, -7.82144344219985e-280, -2.45784944851702e+75,  -1.97728439868794e+198, 1.40870846782662e-129, -6.66817529749419e-128,  -9.25702502151067e-230, 1.23372638242134e+221, 6.24447860853632e-97,  3.27638557500188e+170, -2.05342147679394e+291, -1.41264147567073e-235,  -3.37786920676569e+290), y = c(-1.30645191036484e+87, 9.8777520598665e-150,  3.13104392888557e+177, 4.48348660127392e+260, 15733826472627426,  -Inf, 2.13266685083184e+82, 1.35109142677079e+191, -2.48230766942926e+103,  -2.34598690112698e+196, 2.30259453344384e-241, NA, 9.84541044759078e-137,  -5.67974715780513e-83, 1.9563264479286e+96, 5.84457063222787e+105,  5.10223693666842e-155, 8.44519913091554e+119, 2.8208943154842e-291,  -2.55470824267577e-137, 6.6368099786083e-135, 7.17208184168857e+191,  1.33458888196057e+211, -5.1752813599762e-30, -6.93411821270967e-170,  -3.03879087347274e-297, -7.41726893224367e+213, 0.0136685134534673,  -1.26378354639798e+137, 4.01396581864217e-301, -3.07737154008985e+41,  -9.582382525474e+210, 3.10058772785824e-33, 8.90569998987643e+292,  3.064696589483e-66, 6.84721438491792e+240, 9.4258140972705e+22,  -6.16738101694076e-291, -4.43936025625497e+41, -5.19223859178686e+47,  -1.98117382636979e-263, -5.78377377695099e-158, 1.21856687635733e-253,  8.54179043043184e+107, -1.72172295164871e-289, 1.71394943704316e+87,  1.62790603067736e+302, 5.54306301285134e+28, NaN, -Inf, -2.58765140265168e+63,  -2.1607051560952e-270, Inf))
result <- do.call(s2:::cpp_s2_geog_point,testlist)
str(result)