Open
Description
given:
user <- quote(sqrt(1))
solution <- quote(sqrt(1 + 2))
expect_equal(
detect_mistakes(user, solution)
,
wrong_value(this = quote(1), that = "1 + 2")
)
returns
Error: detect_mistakes(user, solution) not equal to wrong_value(this = quote(1), that = "1 + 2").
1/1 mismatches
x[1]: "I expected a call to `+`() where it was interpreted as 1."
y[1]: "I expected 1 + 2 where it was interpreted as 1."