expected <- eval(parse(text="c(\"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", NA, \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", NA, \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", NA, NA, NA, \"FALSE\", \"FALSE\", \"TRUE\", \"FALSE\", NA, NA, NA, NA, NA, NA, \"FALSE\", NA, \"FALSE\", \"FALSE\", NA, NA, \"FALSE\", NA, NA, \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, \"TRUE\", \"FALSE\", \"FALSE\", NA, \"FALSE\", \"FALSE\", \"FALSE\", \"TRUE\", \"TRUE\", \"TRUE\", NA, \"FALSE\", \"FALSE\", NA, \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", NA, NA, \"FALSE\", \"TRUE\", \"FALSE\", \"FALSE\", \"TRUE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"TRUE\", \"TRUE\", \"TRUE\", NA, NA, \"FALSE\", \"FALSE\", \"FALSE\", NA, \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", NA, \"FALSE\", \"TRUE\", \"FALSE\", NA, \"FALSE\", \"TRUE\", \"TRUE\", \"TRUE\", \"TRUE\", \"FALSE\", \"FALSE\", \"TRUE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", \"FALSE\", NA, \"FALSE\", \"FALSE\", \"FALSE\")"));                 
test(id=0, code={                 
argv <- eval(parse(text="list(c(FALSE, FALSE, FALSE, FALSE, NA, FALSE, FALSE, FALSE, FALSE, NA, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, NA, NA, NA, FALSE, FALSE, TRUE, FALSE, NA, NA, NA, NA, NA, NA, FALSE, NA, FALSE, FALSE, NA, NA, FALSE, NA, NA, FALSE, FALSE, FALSE, FALSE, FALSE, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, TRUE, FALSE, FALSE, NA, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, NA, FALSE, FALSE, NA, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, NA, NA, FALSE, TRUE, FALSE, FALSE, TRUE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, NA, NA, FALSE, FALSE, FALSE, NA, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, NA, FALSE, TRUE, FALSE, NA, FALSE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, TRUE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, NA, FALSE, FALSE, FALSE))"));                 
do.call(`as.character`, argv);                 
}, o=expected);                 

