From ec2dff0be1f3468a55c76202b5b7654011e2584e Mon Sep 17 00:00:00 2001
From: Max Luebke <mluebke@gfz-potsdam.de>
Date: Wed, 3 Apr 2024 21:19:39 +0000
Subject: [PATCH] Add file extension replacement and print output filename

---
 src/initializer.cpp | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/src/initializer.cpp b/src/initializer.cpp
index eacc45a72..d0cdada1a 100644
--- a/src/initializer.cpp
+++ b/src/initializer.cpp
@@ -6,6 +6,7 @@
 
 #include <RInside.h>
 #include <Rcpp.h>
+#include <iostream>
 
 int main(int argc, char **argv) {
   if (argc < 2 || argc > 2) {
@@ -32,9 +33,14 @@ int main(int argc, char **argv) {
 
   init.initializeFromList(setup);
 
-  Rcpp::Function save("saveRDS");
+  // replace file extension by .rds
+  const std::string rds_out_filename =
+      script.substr(0, script.find_last_of('.')) + ".rds";
 
-  save(init.exportList(), "init.rds");
+  Rcpp::Function save("saveRDS");
+  save(init.exportList(), Rcpp::wrap(rds_out_filename));
+
+  std::cout << "Saved result to " << rds_out_filename << std::endl;
 
   //   parseGrid(R, grid, results);
   return EXIT_SUCCESS;