diff options
Diffstat (limited to 'common/utilities.F90')
| -rw-r--r-- | common/utilities.F90 | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/common/utilities.F90 b/common/utilities.F90 index 3ce3363..895e604 100644 --- a/common/utilities.F90 +++ b/common/utilities.F90 @@ -122,7 +122,6 @@ contains function generate_temporary_filename() result(fullpath) use iso_c_binding - use logging implicit none character(len=:), pointer::fullpath @@ -182,7 +181,6 @@ contains ! Convert the C Ptr to a Fortran object clength = c_strlen(tmp_name) if(clength == 0) then - call write_log("temp name is zero length") stop end if call c_f_pointer(tmp_name, cfullpath, (/ clength /)) |