From 68f20c0e7a04467f00fcc2b6febbd891a2d61557 Mon Sep 17 00:00:00 2001
From: sfilippone <filippone.salvatore@gmail.com>
Date: Mon, 7 Oct 2024 12:44:45 +0200
Subject: [PATCH] Modify init

---
 openacc/psb_oacc_env_mod.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/openacc/psb_oacc_env_mod.F90 b/openacc/psb_oacc_env_mod.F90
index dc01ad3a..6d810f74 100644
--- a/openacc/psb_oacc_env_mod.F90
+++ b/openacc/psb_oacc_env_mod.F90
@@ -18,7 +18,7 @@ contains
   subroutine psb_oacc_init(ctxt, dev)
     type(psb_ctxt_type), intent(in) :: ctxt
     integer, intent(in), optional :: dev
-    
+    oacc_do_maybe_free_buffer = .false.    
   end subroutine psb_oacc_init
 
   subroutine psb_oacc_exit()