testlist <- list(c = 1063679333L, y = c(1960826707L, 367142174L, -863071566L,  1898225516L, -1360346244L, -695632541L, -1651360175L, 666012827L,  -1855721562L, 1158989074L, -1571306477L, 2070183977L, 1313056037L,  -870152086L, -1262044196L, NA, -1436110608L, 2054488605L, -859426744L,  716206457L, -199778624L, 958802670L, -320484764L, 742485463L,  -1474443486L, -1832304801L, -1888442438L, 538456852L, 802280809L,  -134260765L, -450803951L, 1656023050L, -760271516L, 2020393736L,  -596983043L, -2081091150L, -957998147L, -428695349L, -1813521162L,  -1681588115L, 1949160173L, -1701448330L, 12022659L, -1400556174L,  -1944840741L, -1009836969L, -1225175727L, -1102201038L, 2073108245L,  638880550L, -872437385L, -2065700369L))
result <- do.call(RSSL:::factor_to_dummy_cpp,testlist)
str(result)