testlist <- list(start = 215859734L, t1 = c(-5.87308157912803e+134, -4.7908813119357e-162,  1.41494464020508e+274, -4.66045491534195e-217, -1.95621945111498e+47,  9.11495255531345e-77, 1.40522173246081e-28, NA, Inf, -3.45974803749539e-151,  2.01365490354449e-170, 6.85051422826836e-265, 1.20253110732759e-170,  -3.92082806206152e+266, -1.87812559208029e+96, 9.56753569701361e+186,  9.56423878454137e-157, -4.98625452952661e+200, 2.38352944315865e-224,  -1.94196456893901e-209, 2.76167997608793e+139, 5.01526925565148e+135,  3.98597197381081e+134, -3.90648875961578e-16, 3.91438770472564e-298,  4.17971610379634e+217, Inf, 1.1706870622584e-266, -1.89792062044569e-129,  -2.27078901899167e+137, -6.57850767821137e-190, 1.16044467760604e-141,  -7.98100363918489e+85, 6.83041650161621e+161, 1.30778977382676e+214,  -2.81874677514203e+57, NA, -1.41115669607094e+48, -1.3961906624014e-155,  -2.16359726763031e+130, 8.67101949392582e+249, -4.35498881692574e+291,  -5.63453490304285e+247, 9.69278414203342e+112, 3.37089203816656e+140,  -4.72500831987239e-94, -3.94436231503231e+277, -3.62728307889539e+230,  2.76209013493351e-208, NA, 1.4057218789494e+44, -7.5005471922013e-286,  0), time_dist = 1869089228L, time_tol = -1573370671L)
result <- do.call(amt:::mk_reg,testlist)
str(result)