fix linux warnings

ahmohamed · Oct 28, 2024 · 7f4767e · 7f4767e
1 parent 6d6c573
commit 7f4767e
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: NetPathMiner
-Version: 1.41.2
+Version: 1.41.3
 Date: 2014 onwards
 Title: NetPathMiner for Biological Network Construction, Path Mining
     and Visualization

diff --git a/src/sbml_interface.cpp b/src/sbml_interface.cpp
@@ -29,7 +29,7 @@ SEXP readsbmlfile(SEXP FILENAME, SEXP ATTR_TERMS, SEXP VERBOSE) {
 
 	Model *model = document->getModel();
 	if(!model){
-		if(verbose)	Rprintf(": Error.\n");
+		if(verbose)	Rprint(": Error.\n");
 		Rf_warningcall(mkChar(filename), "No model in file");
 		return(NEW_LIST(2));
 	}
@@ -41,11 +41,11 @@ SEXP readsbmlfile(SEXP FILENAME, SEXP ATTR_TERMS, SEXP VERBOSE) {
 			message<<"line "<< err->getLine() <<": "<< err->getShortMessage() << "\n";
 			if(err->getErrorId() == NotSchemaConformant ){
 				if(verbose)	Rprintf(": Error.\n");
-				Rf_warningcall(mkChar(filename), message.str().c_str());
+				Rf_warningcall(mkChar(filename), "%s",  message.str().c_str());
 				return(R_NilValue);
 			}
 		}//loop over errors.
-		Rf_warningcall(mkChar(filename), message.str().c_str());
+		Rf_warningcall(mkChar(filename), "%s", message.str().c_str());
 	}
 
 
@@ -366,7 +366,7 @@ SEXP readsbml_sign(SEXP FILENAME, SEXP ATTR_TERMS, SEXP VERBOSE){
 					fatal=true; break;
 				}
 			}//loop over errors.
-			Rf_warningcall(mkChar(filename), message.str().c_str());
+			Rf_warningcall(mkChar(filename), "%s", message.str().c_str());
 		}
 		if(fatal) continue;