Adjust two format strings for new r-devel warning

RcppCore · Nov 24, 2023 · a7b5d36 · a7b5d36
1 parent e52bd46
commit a7b5d36
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 8 deletions.
diff --git a/inst/include/Rcpp/iostream/Rstreambuf.h b/inst/include/Rcpp/iostream/Rstreambuf.h
@@ -1,9 +1,8 @@
-// -*- mode: C++; c-indent-level: 4; c-basic-offset: 4; indent-tabs-mode: nil; -*-
 //
 // Rstreambuf.h: Rcpp R/C++ interface class library -- stream buffer
 //
 // Copyright (C) 2011 - 2020  Dirk Eddelbuettel, Romain Francois and Jelmer Ypma
-// Copyright (C) 2021         Dirk Eddelbuettel, Romain Francois, Jelmer Ypma and Iñaki Ucar
+// Copyright (C) 2021 - 2023  Dirk Eddelbuettel, Romain Francois, Jelmer Ypma and Iñaki Ucar
 //
 // This file is part of Rcpp.
 //
@@ -50,11 +49,11 @@ namespace Rcpp {
     };
 							// #nocov start
     template <> inline std::streamsize Rstreambuf<true>::xsputn(const char *s, std::streamsize num) {
-        Rprintf("%.*s", num, s);
+        Rprintf("%.*s", static_cast<int>(num), s);
         return num;
     }
     template <> inline std::streamsize Rstreambuf<false>::xsputn(const char *s, std::streamsize num) {
-        REprintf("%.*s", num, s);
+        REprintf("%.*s", static_cast<int>(num), s);
         return num;
     }
 

diff --git a/inst/include/Rcpp/print.h b/inst/include/Rcpp/print.h
@@ -1,6 +1,5 @@
-// -*- mode: C++; c-indent-level: 4; c-basic-offset: 4; indent-tabs-mode: nil; -*-
 //
-// Copyright (C) 2015 - 2016  Dirk Eddelbuettel
+// Copyright (C) 2015 - 2023  Dirk Eddelbuettel
 //
 // This file is part of Rcpp.
 //
@@ -27,12 +26,11 @@ inline void print(SEXP s) {
 }
 
 inline void warningcall(SEXP call, const std::string & s) {
-    Rf_warningcall(call, s.c_str());
+    Rf_warningcall(call, "%s", s.c_str());
 }
 
 // also note that warning() is defined in file exceptions.h
 
 }
 
 #endif
-