expected <- eval(parse(text="c(-1.58807515192482, -1.5853608253311, -1.8905549819092, -2.03638740164396, -2.04864530449289, -2.05927873610012, -2.07950663041143, -2.1573190306252, -2.55603846148646, -3.03305155199706, 2.5129171325851, 2.12210230202298, 1.88051133497349, 1.48217257749484, 0.950963940422469, 0.626201213192776, 0.418507380958536, -0.0305492837397495, -0.503517166559614, -0.734498660835802, -1.00443433128024, -1.36980403738717, -1.83907890345965, -2.12644093316839, -2.41831455704726, -2.7914149398297, -2.93984830052399, 3.09350868809237, 2.15258424743368, 1.74092622359257, 1.52279777347564, 0.989909056952835, 0.745910455085922, 0.665139200846025, 0.562048349801519, -1.18089194580775e-15)"));  
test(id=0, code={  
argv <- eval(parse(text="list(c(-12.561836573133-726.935211685406i, -19.15961591777-1315.40822424617i, -666.84872452586-2013.90899841237i, -5775.9038598237-11495.8986046958i, -19052.0606820086-36788.5714510618i, -27954.209922899-52600.8398855356i, -19930.6456597181-35739.3494902644i, -7168.9170917163-10787.9325286278i, -2331.00733468417-1545.77448035635i, -1953.77845230855-212.90200115993i, -1953.60071030304+1420.43983282655i, -1700.4015174326+2765.31423009739i, -862.10275212019+2693.95914108523i, 163.24691179114+1837.1971341258i, 824.29498680332+1155.03126302727i, 939.495937605926+679.549172893055i, 686.101881005818+305.166761591578i, 460.339323160381-14.067413050801i, 533.688543397269-293.997358985575i, 773.041200043657-698.096300485637i, 716.84959340189-1127.39175172066i, 226.23728166311-1110.40349894929i, -203.687633095422-740.924670781257i, -271.865544904439-437.858153233594i, -316.769706633022-279.671035520361i, -624.842102639273-228.211019456587i, -806.31350008813-164.912647906911i, -506.559675826232+24.376187336594i, -142.784303570554+217.087547410547i, -44.704338624059+260.225831716256i, 10.565037460572+219.942519605707i, 143.643627814428+218.823069474359i, 232.58540850813+214.905815487636i, 223.286482103748+175.139821578561i, 185.008902762186+116.519845434485i, 171.150234739785-0i))"));  
do.call(`Arg`, argv);  
}, o=expected);  

