aboutsummaryrefslogtreecommitdiff
path: root/common
diff options
context:
space:
mode:
Diffstat (limited to 'common')
-rw-r--r--common/protocol.f902
-rw-r--r--common/request.f902
2 files changed, 2 insertions, 2 deletions
diff --git a/common/protocol.f90 b/common/protocol.f90
index 37e3205..992283c 100644
--- a/common/protocol.f90
+++ b/common/protocol.f90
@@ -228,7 +228,7 @@ contains
character, dimension(BUFFER_SIZE)::buffer
logical, dimension(4)::successes
- integer::i, ierr, bytes_read, bytes_written, total_written
+ integer::i, bytes_read, bytes_written, total_written
! For direct processing of the reponse line
integer::response_line_index, bytes_received
diff --git a/common/request.f90 b/common/request.f90
index e9043c0..d7b3120 100644
--- a/common/request.f90
+++ b/common/request.f90
@@ -230,7 +230,7 @@ contains
integer::start_send
integer::chars_sent_this_time, chars_sending
- integer::i, bytes
+ integer::i
integer::string_length
character, dimension(bufsize)::buffer