From 3e0fba392d34771ad0f1d7eaf4cb79d8eefaae55 Mon Sep 17 00:00:00 2001
From: tqchen <tianqi.tchen@gmail.com>
Date: Tue, 27 Jan 2015 16:29:52 -0800
Subject: [PATCH] fix the integer overflow

---
 R-package/src/xgboost_R.cpp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R-package/src/xgboost_R.cpp b/R-package/src/xgboost_R.cpp
index b4757542d..f1958c709 100644
--- a/R-package/src/xgboost_R.cpp
+++ b/R-package/src/xgboost_R.cpp
@@ -71,8 +71,8 @@ extern "C" {
                                 SEXP missing) {
     _WrapperBegin();
     SEXP dim = getAttrib(mat, R_DimSymbol);
-    int nrow = INTEGER(dim)[0];
-    int ncol = INTEGER(dim)[1];    
+    bst_ulong nrow = static_cast<bst_ulong>(INTEGER(dim)[0]);
+    bst_ulong ncol = static_cast<bst_ulong>(INTEGER(dim)[1]);
     double *din = REAL(mat);
     std::vector<float> data(nrow * ncol);
     #pragma omp parallel for schedule(static)