From 96d43dbba1255d897f6048a2d076734c8adddb51 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Kirill=20M=C3=BCller?= Date: Sat, 7 Dec 2024 15:15:44 +0100 Subject: [PATCH] chore: More explicit message on constructive errors --- R/spec-meta-bind-runner.R | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/R/spec-meta-bind-runner.R b/R/spec-meta-bind-runner.R index a1881e718..f9ae28831 100644 --- a/R/spec-meta-bind-runner.R +++ b/R/spec-meta-bind-runner.R @@ -237,7 +237,13 @@ test_select_bind_expr_one$fun <- function( } construct_expr <- function(x) { - xc <- constructive::construct(x) + xc <- tryCatch( + constructive::construct(x, check = TRUE), + error = function(e) { + print(e) + constructive::construct(x, check = FALSE) + } + ) parse_expr(format(xc$code)) }