From 815e8060affe953e8fcc64f644864e9f0ebd2b21 Mon Sep 17 00:00:00 2001 From: Mathieu Lirzin Date: Tue, 26 Jul 2016 12:08:46 +0200 Subject: database: Remove "db-add-build-log" test. * tests/database/scm ("db-add-build-log"): Delete. --- tests/database.scm | 9 --------- 1 file changed, 9 deletions(-) (limited to 'tests') diff --git a/tests/database.scm b/tests/database.scm index 39f9fcc..29a1e50 100644 --- a/tests/database.scm +++ b/tests/database.scm @@ -83,15 +83,6 @@ INSERT INTO Evaluations (derivation, job_name, specification)\ (test-assert "db-get-evaluation" (db-get-evaluation (%db) (%id))) - (test-expect-fail "db-add-build-log") - ;; XXX: 'Builds' database table is not implemented yet. - (test-equal "db-add-build-log" - "foo log" - (let ((job (acons #:id (%id) (make-dummy-job))) - (log-column 3)) - (db-add-build-log (%db) job "foo log") - (vector-ref (db-get-evaluation (%db) (%id)) log-column))) - (test-assert "db-close" (db-close (%db)))) (λ () -- cgit v1.2.3