From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:51934) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1esvkL-0002UZ-4m for guix-patches@gnu.org; Mon, 05 Mar 2018 14:26:06 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1esvkI-00037y-Gs for guix-patches@gnu.org; Mon, 05 Mar 2018 14:26:05 -0500 Received: from debbugs.gnu.org ([208.118.235.43]:38327) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1esvkI-00037f-Cz for guix-patches@gnu.org; Mon, 05 Mar 2018 14:26:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1esvkI-0001Cp-3z for guix-patches@gnu.org; Mon, 05 Mar 2018 14:26:02 -0500 Subject: [bug#30701] [PATCH 2/3] tests: databases: Add a system test for PostgreSQL. Resent-Message-ID: References: <20180305083917.24122-1-mail@cbaines.net> <20180305083917.24122-2-mail@cbaines.net> <87d10izqia.fsf@lassieur.org> From: Christopher Baines In-reply-to: <87d10izqia.fsf@lassieur.org> Date: Mon, 05 Mar 2018 19:25:38 +0000 Message-ID: <87efkypbnx.fsf@cbaines.net> MIME-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha512; protocol="application/pgp-signature" List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: =?UTF-8?Q?Cl=C3=A9ment?= Lassieur Cc: 30701@debbugs.gnu.org --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Cl=C3=A9ment Lassieur writes: > Christopher Baines writes: > >> * gnu/tests/databases.scm (%postgresql-os, %test-postgresql): New variab= les. >> (run-postgresql-test): New procedure. >> --- >> gnu/tests/databases.scm | 55 ++++++++++++++++++++++++++++++++++++++++++= +++++++ >> 1 file changed, 55 insertions(+) >> >> diff --git a/gnu/tests/databases.scm b/gnu/tests/databases.scm >> index e7097690a..583f484d7 100644 >> --- a/gnu/tests/databases.scm >> +++ b/gnu/tests/databases.scm >> @@ -30,6 +30,7 @@ >> #:use-module (guix store) >> #:export (%test-memcached >> %test-mongodb >> + %test-postgresql >> %test-mysql)) >>=20=20 >> (define %memcached-os >> @@ -208,6 +209,60 @@ >> (value (run-mongodb-test)))) >>=20=20 >> >> +;;; >> +;;; The PostgreSQL service. >> +;;; >> + >> +(define %postgresql-os >> + (simple-operating-system >> + (service postgresql-service-type))) >> + >> +(define* (run-postgresql-test) > > define, instead of define* > >> + "Run tests in %POSTGRESQL-OS." >> + (define os >> + (marionette-operating-system >> + %postgresql-os >> + #:imported-modules '((gnu services herd) >> + (guix combinators)))) >> + >> + (define vm >> + (virtual-machine >> + (operating-system os) >> + (memory-size 512))) >> + >> + (define test >> + (with-imported-modules '((gnu build marionette)) >> + #~(begin >> + (use-modules (srfi srfi-11) (srfi srfi-64) > > I think srfi-11 is useless. Good spot, I'll make these changes and send some new patches. --=-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- iQKTBAEBCgB9FiEEPonu50WOcg2XVOCyXiijOwuE9XcFAlqdmbJfFIAAAAAALgAo aXNzdWVyLWZwckBub3RhdGlvbnMub3BlbnBncC5maWZ0aGhvcnNlbWFuLm5ldDNF ODlFRUU3NDU4RTcyMEQ5NzU0RTBCMjVFMjhBMzNCMEI4NEY1NzcACgkQXiijOwuE 9Xe3JQ//T2ZBUcypPItOD2GF28cp0mGmlobU9IqJwNQ8QY/ouaLk77ySzWXZh+6R MRD9BxyILanHXW4yNNWIsnWL6uOAB1r4iFALkGy6nKJywzndGEFdbN8Io5cvEwXx Mgc+v1EjA4EcWeTcxY1xOdyBUNqRAhLCy++1wGQGgVvrB8EJJF4oa4Rsi/1xtqwA 34wFuAljtxA9aOaUFiQH0w7MzG3Cqf0iPGalfaAmWtms34+U9SU0xADi5Wmb686e xkcbJqgehcF1+rpgvwD+hhqmr6k2eRs4vyUXD2sTt+r/c3x3juno8T77OS4xSFdK LsVzcUdg+0ECNsBLLPkmLRfg8yMeKuLe42ystndUardB80DIrs8BZnXZLK4uy7gi xgAah8dNV1D5A/2uOmST4+cZYo9HyJuF3Z1jkEz77v1ePm1L2119jL2awj4szlcS dsLPAMGGCQ6TjVVwv6PzWCduKx5CHGeSSAYRUtt5hJkYfknebhqWuaFl7APv4d7O CzjbB8kl8DVWmp135B6P7naPnP9LDejqFf+70bigfFipMOsCZ1sSnAdH8eiUFVYa tvRVb0uV4Cq6M6z6gAzmO/QP3qk/i/Poi1wbYoX27S4KUqPnnhRuYIa+ectt8z9d w7I20zDDcIngKiyIr2Iagk3ARphqLLHs6FEXP78eQRTStyGUp9I= =ou27 -----END PGP SIGNATURE----- --=-=-=--