``` > val.toks <- list(INT) > vet(val.toks[[1]], 1L) [1] "`1L` should be type \"language\" (is \"integer\")" ```