Overview
Comment: | Move close-output-port to right after sending serialize data |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | v2.0001-blocking-fix |
Files: | files | file ages | folders |
SHA1: |
ec82c7ffc82b42937756acd9a878f2b1 |
User & Date: | matt on 2022-01-14 05:49:32 |
Other Links: | branch diff | manifest | tags |
Context
2022-01-14
| ||
05:49 | Move close-output-port to right after sending serialize data Leaf check-in: ec82c7ffc8 user: matt tags: v2.0001-blocking-fix | |
2022-01-11
| ||
09:00 | Go back to single log for a server. The splitting of the logs was not proving useful check-in: b4ff9e2f1d user: matt tags: v2.0001 | |
Changes
Modified megatest.scm from [b7fe71f476] to [97b3fd5fe2].
︙ | |||
17 18 19 20 21 22 23 | 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 | - + | ;; (declare (uses dbi)) (declare (uses pkts)) (declare (uses stml2)) (declare (uses cookie)) (declare (uses csv-xml)) |
︙ | |||
128 129 130 131 132 133 134 | 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 | - + | srfi-98 srfi-69 ;; local modules autoload adjutant csv-xml |
︙ |
Modified ulex/ulex.scm from [70c15d4319] to [ff88f35c25].
︙ | |||
230 231 232 233 234 235 236 237 238 239 240 241 | 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 | + - + | #f (begin ;; (mutex-lock! *send-mutex*) (let-values (((inp oup)(tcp-connect host-port))) (let ((res (if (and inp oup) (begin (serialize dat oup) (close-output-port oup) (deserialize inp)) (begin (print "ERROR: send called but no receiver has been setup. Please call setup first!") #f)))) (close-input-port inp) |
︙ |