diff options
| author | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-05-17 14:50:49 -0400 |
|---|---|---|
| committer | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-05-17 14:50:49 -0400 |
| commit | 23b515ec5beda4c514891cb546db028811a7ffe1 (patch) | |
| tree | 12242fbaa3abd1cbbd2573c8f050cff7d0418d3d | |
| parent | d45ebf57efe6e08d346f9cb23e1fcd9f5eead4f8 (diff) | |
| download | levitating-23b515ec5beda4c514891cb546db028811a7ffe1.tar.gz levitating-23b515ec5beda4c514891cb546db028811a7ffe1.zip | |
Removed debugging output
| -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 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) |