aux/socket: patch scheduling bug in socket egg
It's possible for the thread to be interrupted between configuring the timeout and the file descriptor wait. This causes a low-probability 60 second wait until the timeout expires. Now that this is fixed, we can set a normal timeout on the socket once again, so do that. Link: https://github.com/ursetto/socket-egg/pull/7
This commit is contained in:
parent
fa3103ac82
commit
84207df87d
3 changed files with 24 additions and 2 deletions
21
aux/socket.diff
Normal file
21
aux/socket.diff
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
diff --git a/build-socket-config b/build-socket-config
|
||||
index 7061553..a9b120f 100755
|
||||
--- a/build-socket-config
|
||||
+++ b/build-socket-config
|
||||
@@ -3,3 +3,4 @@
|
||||
echo "(import scheme)" > socket-config.scm
|
||||
echo "(import (chicken platform))" >> socket-config.scm
|
||||
./socket-features >> socket-config.scm
|
||||
+touch socket-config
|
||||
diff --git a/socket.egg b/socket.egg
|
||||
index 70c3b56..fa876f3 100644
|
||||
--- a/socket.egg
|
||||
+++ b/socket.egg
|
||||
@@ -13,6 +13,7 @@
|
||||
(source-dependencies "socket.scm")
|
||||
(component-dependencies socket-config)
|
||||
(csc-options "-O2" "-d1"
|
||||
+ "-disable-interrupts"
|
||||
"-X" "socket-config"
|
||||
"-X" "feature-test-syntax"
|
||||
"-D" "scan-buffer-line-returns-3-vals")))
|
||||
Loading…
Add table
Add a link
Reference in a new issue