ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 07:26:13 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Skip unreliable "herd invalidate nscd" test.

Browse source 
* gnu/tests/base.scm (run-basic-test)["nscd invalidate action, wrong
table"]: Skip unconditionally.
This commit is contained in:
Ludovic Courtès 2019-05-15 12:14:58 +02:00
parent 8b310793d2
commit 33572a3662
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gnu/services/base.scm
View file

@ -1294,8 +1294,8 @@ (define (nscd-action-procedure nscd config option)
(lambda args (lambda args
;; There's a race with the SIGCHLD handler, which could ;; There's a race with the SIGCHLD handler, which could
;; call 'waitpid' before 'close-pipe' above does. If we ;; call 'waitpid' before 'close-pipe' above does. If we
;; get ECHILD, that means we lost the race, but that's ;; get ECHILD, that means we lost the race; in that case, we
;; fine. ;; cannot tell what the exit code was (FIXME).
(or (= ECHILD (system-error-errno args)) (or (= ECHILD (system-error-errno args))
(apply throw args))))) (apply throw args)))))
(line (line

3
gnu/tests/base.scm
View file

@ -382,6 +382,9 @@ (define (entry->list entry)
result) result)
marionette)) marionette))
;; FIXME: The 'invalidate' action can't reliably obtain the exit
;; code of 'nscd' so skip this test.
(test-skip 1)
(test-equal "nscd invalidate action, wrong table" (test-equal "nscd invalidate action, wrong table"
'(#f) ;one value, #f '(#f) ;one value, #f
(marionette-eval '(with-shepherd-action 'nscd ('invalidate "xyz") (marionette-eval '(with-shepherd-action 'nscd ('invalidate "xyz")