testlist <- list(relocs_time = c(-7.9799491895782e+180, 2.24467612876009e+46,  7.69107966546363e-297, 2.36800982973099e+73, -2.21734407705012e-113,  -3414.87574095419, -7.89118948733873e-171, 6055568.12401342,  9.59719651516113e+249, -5.52945626736334e-216, -0.356309706517213,  -8.78415520158091e-157, -9.07497525345675e+113, -8.1495524117603e+61,  4.01598437124933e+198, 2.46260479304122e+92, 6.16194887291844e-149,  4.08880261811601e+31, NA, -1.84434634801325e+131, -9.51120942866953e-120,  -1.81877949811932e+47, 1.10617201932871e-179, 2.08766345067283e+260,  -3.52067212919665e+31, 4.38963585334248e-218, 1.26868902532172e+115,  3.38574318305295e+107, -3.8909526513797e+195, 5.33159840092361e-57,  -6.62281957064037e-203, -5.88646009262016e-59, 9.58376318407206e-131,  -9.60031801537812e+56, 1.04954749905772e-289, 6.03702905030843e+218,  -5.53948429435843e-173, -6.3931878855609e-31, 2.9166407390375e-43,  1.22302448150402e+129, -2.17556770664833e+142, 3.82381082713822e-30,  Inf, 7944404.07140971, 2.88550646729026e+96, -1.00542384754803e-269,  -4.69690193541205e+112, -2.41188592767745e-58, -1.97539487592059e+287,  2.60427649540554e+188, -3.55340151644895e-299, 2.32360087517968e-291,  -1.30664696548886e-207, 3.53517827549175e-229, 6.51310702226386e+265,  -2.46128826397825e+82, 1.31193099321217e-303, -4.32895600978449e+204,  -0.322922793717632, 2.16284845274181e+257, -7.97016725520492e-216,  -6.6504670591982e-206, -2.19731042369605e-253, 4.11229966892677e-94,  -3.83329335428514e-221, 2.34591068762095e+191, 2.71744491973705e+112,  7.75169862421567e+231, 4.29749756635337e+79, -3.4729019015459e+275,  -7.52758953342519e-42, 1.30731546546277e-21, 2.07522521724141e-165,  -9.07497525345675e+113, -5.75647218022816e+100, 5.85393701039399e+140,  -1.91472516716052e+203, 36378301922301.4, 8.12958470023037e-153,  5.07251440187329e-163, 2920230.71984976, -9.60169784948142e-186,  -7.98212046241572e+152, 1.5809934143523e+221, -1.42199364957203e-251,  6.47286640597486e+227, -Inf), start = -2101226207L, time_dist = 449719835L,      time_tol = 250814798L)
result <- do.call(amt:::mk_reg_old,testlist)
str(result)