diff options
| author | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-04-05 12:02:46 -0400 |
|---|---|---|
| committer | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-04-05 12:02:46 -0400 |
| commit | 15837a5fd46a1c9051d54138ba3ade26c74091f1 (patch) | |
| tree | 9f2bca5660c75222a227c19c754f6a1ecd7fb75b /common/utilities.F90 | |
| parent | 27c3147c7efe37657563fadcb835b50d00423475 (diff) | |
| download | levitating-15837a5fd46a1c9051d54138ba3ade26c74091f1.tar.gz levitating-15837a5fd46a1c9051d54138ba3ade26c74091f1.zip | |
Fixed URL issues in player
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 /)) |