meta def eval_list (α : Type) [reflected α] (e : expr) : tactic (list α) := tactic.eval_expr (list α) e run_cmd eval_list ℕ ↑`([1, 2]) >>= tactic.trace