suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Remove value store in ready_pos but unread (#2588)

Browse Source 
* Remove value store in ready_pos but unread

* Move declaration of ready_pos to where it is used

* Make discard of return value of tcp_check_accept explicit

* Split declaration and var assignment to comply with xform
This commit is contained in:
Paulo Matos 2019-04-10 14:14:57 +02:00 committed by GitHub
parent 8403ce4109
commit 9e8b9d8959
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
racket/src/racket/src/network.c
View File

@ -1192,7 +1192,7 @@ static Scheme_Object *
do_tcp_accept(int argc, Scheme_Object *argv[], Scheme_Object *cust, char **_fail_reason)
/* If _fail_reason is not NULL, never raise an exception. */
{
int was_closed = 0, ready_pos;
int was_closed = 0;
Scheme_Object *listener;
rktio_fd_t *s;
@ -1204,17 +1204,17 @@ do_tcp_accept(int argc, Scheme_Object *argv[], Scheme_Object *cust, char **_fail
was_closed = LISTENER_WAS_CLOSED(listener);
if (!was_closed) {
int ready_pos;
ready_pos = tcp_check_accept(listener, NULL);
if (!ready_pos) {
scheme_block_until((Scheme_Ready_Fun)tcp_check_accept,
tcp_accept_needs_wakeup,
listener,
0.0);
ready_pos = tcp_check_accept(listener, NULL);
(void)tcp_check_accept(listener, NULL);
}
was_closed = LISTENER_WAS_CLOSED(listener);
} else
ready_pos = 0;
}
if (was_closed) {
if (_fail_reason)