From 9eba058b4ff4e5eef79b537bc808126e4bd5dd58 Mon Sep 17 00:00:00 2001
From: edoapra <edoardo.apra@gmail.com>
Date: Wed, 19 Jul 2023 09:42:28 -0700
Subject: [PATCH] stop when > 90% files allowed

---
 src/tools/mpipr-too-many_patch.sh | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/tools/mpipr-too-many_patch.sh b/src/tools/mpipr-too-many_patch.sh
index b676a6a96b..07658a964d 100755
--- a/src/tools/mpipr-too-many_patch.sh
+++ b/src/tools/mpipr-too-many_patch.sh
@@ -32,8 +32,8 @@ cat > mpipr-too-many.patch <<EOF
 +#ifdef DEBUGSHM
 +  if(nfiles % 1000 == 0) fprintf(stderr," %d: no. open files = %ld maxfiles = %ld\n", g_state.rank, nfiles, maxfiles);
 +#endif
-+  long mylimit = (maxfiles/100)*60;
-+    if(nfiles > (maxfiles/100)*60) {
++  long mylimit = (maxfiles/100)*90;
++    if(nfiles > (maxfiles/100)*90) {
 +      printf(" %d: running out of files; files = %ld  maxfiles = %ld\n", g_state.rank, nfiles, maxfiles);
 +#if PAUSE_ON_ERROR
 +    fprintf(stderr,"%d(%d): too many open files\n",