Overview
Comment: | Rebase forward. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | v2.0001-disallow-eof |
Files: | files | file ages | folders |
SHA1: |
09cc793198f522648ec4892c5380c5dc |
User & Date: | mrwellan on 2022-02-16 10:31:06 |
Other Links: | branch diff | manifest | tags |
Context
2022-02-16
| ||
10:31 | Rebase forward. Closed-Leaf check-in: 09cc793198 user: mrwellan tags: v2.0001-disallow-eof | |
2022-02-15
| ||
11:30 | When checking for running tests if on same host do not use ssh check-in: de21785cce user: mrwellan tags: v2.0001 | |
Changes
Modified apimod.scm from [e1bfe096ff] to [eef34f67f2].
︙ | |||
396 397 398 399 400 401 402 | 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 | - + + + | ;; (define (api:execute-requests dbstruct cmd params) (let* ((start-t (current-milliseconds)) ;; (readonly-mode (dbr:dbstruct-read-only dbstruct)) ;; (readonly-command (member cmd api:read-only-queries)) ;; (writecmd-in-readonly-mode (and readonly-mode (not readonly-command))) (res (api:dispatch-cmd dbstruct cmd params))) |
︙ |
Modified ulex-simple/ulex.scm from [db661a09b9] to [ccae4a1fd7].
︙ | |||
269 270 271 272 273 274 275 | 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 | + + - + - + | (let-values (((inp oup)(tcp-connect host port))) (let ((res (if (and inp oup) (begin (write (obj->string dat) oup) ;; (write dat oup) ;; (serialize dat oup) (close-output-port oup) (let ((inp-res (read inp))) (assert (not (eof-object? inp-res)) "FATAL: returning eof not allowed. "cmd", "params) |
︙ |