From 1c6e031c7558163e807e515c783b3dbcbbbe80d5 Mon Sep 17 00:00:00 2001
From: Jiaming Yuan <jm.yuan@outlook.com>
Date: Fri, 15 Dec 2023 01:30:43 +0800
Subject: [PATCH] [R] Fix clang warning. (#9874)

---
 R-package/src/xgboost_R.cc | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/R-package/src/xgboost_R.cc b/R-package/src/xgboost_R.cc
index c27dc5e86..c675e873d 100644
--- a/R-package/src/xgboost_R.cc
+++ b/R-package/src/xgboost_R.cc
@@ -154,12 +154,12 @@ SEXP SafeMkChar(const char *c_str, SEXP continuation_token) {
   }                                             \
   PutRNGstate();
 
-/*!
- * \brief macro to check the call.
+/**
+ * @brief Macro for checking XGBoost return code.
  */
-#define CHECK_CALL(x)                           \
-  if ((x) != 0) {                               \
-    error(XGBGetLastError());                   \
+#define CHECK_CALL(__rc)               \
+  if ((__rc) != 0) {                   \
+    Rf_error("%s", XGBGetLastError()); \
   }
 
 using dmlc::BeginPtr;