diff options
Diffstat (limited to 'common/protocol.f90')
-rw-r--r-- | common/protocol.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/common/protocol.f90 b/common/protocol.f90 index be6f280..3b4a8a3 100644 --- a/common/protocol.f90 +++ b/common/protocol.f90 @@ -180,7 +180,7 @@ contains else - write(unit_number) buffer(i) + write(unit_number, '(A1)', advance='no') buffer(i) end if |