guix.git/guix/tests, branch masterPersonal branch of https://git.savannah.gnu.org/cgit/guix.git/ for implementing 'guix deploy'.
https://www.git.jakob.space/guix.git/atom?h=master2017-10-12T21:47:48Ztests: Support multiple HTTP server instances.2017-10-12T21:47:48ZLudovic Courtèsludo@gnu.org2017-10-12T21:19:09Zurn:sha1:6ea10db973d861cd8774938e40151c0f8b2d266f
* guix/tests/http.scm (%http-server-socket): Turn into...
(open-http-server-socket): ... this procedure.
(http-server-can-listen?): New procedure.
(http-write, %http-server-lock, %http-server-ready)
(http-open, stub-http-server): Move to 'call-with-http-server' body.
(call-with-http-server): Add #:headers parameter.
(with-http-server): Add an additional pattern with headers.
* tests/derivations.scm: Use (http-server-can-listen?) instead
of (force %http-server-socket).
* tests/lint.scm: Likewise.
tests: Move HTTP server to (guix tests http).2016-11-16T17:00:41ZLudovic Courtèsludo@gnu.org2016-11-16T15:34:17Zurn:sha1:17ab08bcf0ae27ec6a1f07766080ebfbea8837d9
* tests/lint.scm (%http-server-port, %local-url)
(%http-server-socket, http-write, %http-server-lock)
(%http-server-ready, http-open, stub-http-server)
(call-with-http-server, with-http-server): Move to (guix tests http).
Adjust tests for %HTTP-SERVER-SOCKET as a promise and %LOCAL-URL as a
parameter.
* guix/tests/http.scm: New file.
* Makefile.am (dist_noinst_DATA): Add it.
(GOBJECTS): Add .go files for all of $(dist_noinst_DATA).
(make-go): Depend on $(dist_noinst_DATA).