From 48d300674a1e6ee05066803cd40432831119f8ba Mon Sep 17 00:00:00 2001
From: q-posev <q-posev@trex-coe>
Date: Thu, 6 May 2021 09:19:05 +0200
Subject: [PATCH] portability patch for mac

---
 src/templates_hdf5/templator_hdf5.org |  2 +-
 src/templates_text/templator_text.org | 16 ++++++++--------
 2 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/src/templates_hdf5/templator_hdf5.org b/src/templates_hdf5/templator_hdf5.org
index d843450..5276eda 100644
--- a/src/templates_hdf5/templator_hdf5.org
+++ b/src/templates_hdf5/templator_hdf5.org
@@ -235,7 +235,7 @@ trexio_hdf5_write_$group_num$ (trexio_t* const file, const uint64_t num)
     if (infile_num != num) {
 
       if (infile_num != 0) {
-	printf("%lu -> %lu %s \n", num, infile_num,
+	printf("%llu -> %llu %s \n", num, infile_num,
 	       "This variable already exists. Overwriting it is not supported");
 	return TREXIO_FAILURE;
 
diff --git a/src/templates_text/templator_text.org b/src/templates_text/templator_text.org
index 35d7f97..5b6ef2a 100644
--- a/src/templates_text/templator_text.org
+++ b/src/templates_text/templator_text.org
@@ -347,7 +347,7 @@ trexio_text_read_$group$ (trexio_text_t* const file)
 	return NULL;
       }
 
-      rc = fscanf(f, "%lu\n", &($group$->dims_$group_dset$[i]));
+      rc = fscanf(f, "%llu\n", &($group$->dims_$group_dset$[i]));
       assert(!(rc != 1));
       if (rc != 1) {
 	FREE(buffer);
@@ -373,7 +373,7 @@ trexio_text_read_$group$ (trexio_text_t* const file)
       return NULL;
     }
 
-    rc = fscanf(f, "%lu", &($group$->$group_num$));
+    rc = fscanf(f, "%llu", &($group$->$group_num$));
     assert(!(rc != 1));
     if (rc != 1) {
       FREE(buffer);
@@ -479,14 +479,14 @@ trexio_text_flush_$group$ (trexio_text_t* const file)
   if ($group$->rank_$group_dset$ != 0) size_$group_dset$ = 1;
 
   for (unsigned int i=0; i<$group$->rank_$group_dset$; ++i){
-    fprintf(f, "dims_$group_dset$ %u  %lu\n", i, $group$->dims_$group_dset$[i]);
+    fprintf(f, "dims_$group_dset$ %u  %llu\n", i, $group$->dims_$group_dset$[i]);
     size_$group_dset$ *= $group$->dims_$group_dset$[i];
   }
 
   // END REPEAT GROUP_DSET
 
   // START REPEAT GROUP_NUM
-  fprintf(f, "$group_num$ %lu\n", $group$->$group_num$);
+  fprintf(f, "$group_num$ %llu\n", $group$->$group_num$);
   // END REPEAT GROUP_NUM
 
   /* Write arrays */
@@ -758,7 +758,7 @@ rdm_t* trexio_text_read_rdm(trexio_text_t* const file) {
     assert (rc == 1);
     assert (strcmp(buffer, "dim_one_e") == 0);
 
-    rc = fscanf(f, "%lu", &(rdm->dim_one_e));
+    rc = fscanf(f, "%llu", &(rdm->dim_one_e));
     assert (rc == 1);
 
     /* Allocate arrays */
@@ -831,7 +831,7 @@ trexio_exit_code trexio_text_flush_rdm(trexio_text_t* const file) {
   fseek(f, 0L, SEEK_SET);
 
   /* Write the dimensioning variables */
-  fprintf(f, "num %lu\n", rdm->dim_one_e);
+  fprintf(f, "num %llu\n", rdm->dim_one_e);
 
   /* Write arrays */
   fprintf(f, "one_e\n");
@@ -993,7 +993,7 @@ trexio_text_buffered_read_rdm_two_e(trexio_t* const file,
   fseek(f, (long) offset * line_length, SEEK_SET);
 
   for (uint64_t i=0 ; i<size ; ++i) {
-    int rc = fscanf(f, "%9ld %9ld %9ld %9ld %24le\n",
+    int rc = fscanf(f, "%9lld %9lld %9lld %9lld %24le\n",
 	   &index[4*i],
 	   &index[4*i+1],
 	   &index[4*i+2],
@@ -1032,7 +1032,7 @@ trexio_text_buffered_write_rdm_two_e(trexio_t* const file,
   fseek(f, (long) offset * line_length, SEEK_SET);
 
   for (uint64_t i=0 ; i<size ; ++i) {
-    int rc = fprintf(f, "%9ld %9ld %9ld %9ld %24le\n",
+    int rc = fprintf(f, "%9lld %9lld %9lld %9lld %24le\n",
 	   index[4*i],
 	   index[4*i+1],
 	   index[4*i+2],