From 23b515ec5beda4c514891cb546db028811a7ffe1 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Mon, 17 May 2021 14:50:49 -0400 Subject: Removed debugging output --- common/utilities.F90 | 2 -- 1 file changed, 2 deletions(-) (limited to 'common') diff --git a/common/utilities.F90 b/common/utilities.F90 index abf6bc1..d399bc1 100644 --- a/common/utilities.F90 +++ b/common/utilities.F90 @@ -231,8 +231,6 @@ contains tmp_path = c_loc(temporary_directory) end if - Print *, res - tmp_name = c_malloc(int(1024, kind=c_size_t)) prefix = "lev"//c_null_char res = GetTempFileName(tmp_path, c_loc(prefix), 0, tmp_name) -- cgit v1.2.3