Skip to content

Commit 3691c01

Browse files
authored
Silence three tests following PR #1413 (#1422)
1 parent f22f7e2 commit 3691c01

File tree

2 files changed

+9
-4
lines changed

2 files changed

+9
-4
lines changed

ChangeLog

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,8 @@
1+
2025-12-12 Dirk Eddelbuettel <edd@debian.org>
2+
3+
* inst/tinytest/test_system.R: Wrap suppressMessages() around three
4+
tests for long-obsolete linker and compiler flags
5+
16
2025-12-06 Dirk Eddelbuettel <edd@debian.org>
27

38
* DESCRIPTION (Version, Date): Roll micro version and date

inst/tinytest/test_system.R

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11

2-
## Copyright (C) 2016 - 2019 Dirk Eddelbuettel
2+
## Copyright (C) 2016 - 2025 Dirk Eddelbuettel
33
##
44
## This file is part of Rcpp.
55
##
@@ -24,9 +24,9 @@ inc_sys <- tools::file_path_as_absolute( base::system.file("include", package =
2424
expect_equal(inc_rcpp, inc_sys, info = "Rcpp.system.file")
2525

2626
# test.RcppLd <- function() {
27-
expect_true(Rcpp:::RcppLdPath() == "", info = "RcppLdPath")
28-
expect_true(Rcpp:::RcppLdFlags() == "", info = "RcppLdFlags")
29-
expect_equal(Rcpp:::LdFlags(), NULL, info = "LdFlags")
27+
expect_true(suppressMessages(Rcpp:::RcppLdPath()) == "", info = "RcppLdPath")
28+
expect_true(suppressMessages(Rcpp:::RcppLdFlags()) == "", info = "RcppLdFlags")
29+
expect_equal(suppressMessages(Rcpp:::LdFlags()), NULL, info = "LdFlags")
3030

3131
# test.RcppCxx <- function() {
3232
expect_true(Rcpp:::canUseCXX0X(), info = "canUseCXX0X")

0 commit comments

Comments
 (0)