if (FALSE) {
q_id <- queries_post(db_id, query, n_rows, cred_id)[["id"]]
r <- tryCatch(await(queries_get, id = q_id), error = function(e) e)
print(r)
get_error(r)
r <- try(await(queries_get, id = q_id))
get_error(r)
}
Run the code above in your browser using DataLab