# lints
lint(
text = 'if (all.equal(a, b)) message("equal")',
linters = all_equal_linter()
)
lint(
text = '!all.equal(a, b)',
linters = all_equal_linter()
)
lint(
text = 'isFALSE(all.equal(a, b))',
linters = all_equal_linter()
)
# okay
lint(
text = 'if (isTRUE(all.equal(a, b))) message("equal")',
linters = all_equal_linter()
)
lint(
text = '!identical(a, b)',
linters = all_equal_linter()
)
lint(
text = "!isTRUE(all.equal(a, b))",
linters = all_equal_linter()
)
Run the code above in your browser using DataLab