Add branch for negative non-integer values

r-lib · Dec 10, 2023 · 1797fa2 · 1797fa2
1 parent d6fc33a
commit 1797fa2
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/expect_identical_linter.R b/R/expect_identical_linter.R
@@ -69,6 +69,10 @@ expect_identical_linter <- function() {
  and expr[NUM_CONST[contains(text(), '.')]]
  ]
  or following-sibling::expr[NUM_CONST[contains(text(), '.')]]
+ or following-sibling::expr[
+ OP-MINUS
+ and expr[NUM_CONST[contains(text(), '.')]]
+ ]
  or following-sibling::expr[SYMBOL[text() = '...']]
  )]
  /parent::expr