1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

tests: Relax test on utmpx entries.

Partly fixes <http://bugs.gnu.org/25476>.
Reported by Paul Garlick <pgarlick@tourbillion-technology.com>.

* tests/syscalls.scm ("utmpx-entries"): Check whether ENTRY is of type
'BOOT_TIME', in which case PID may be 0.
This commit is contained in:
Ludovic Courtès
2017-02-11 22:26:36 +01:00
parent bd2337228d
commit a1a8b7f2e2

View File

@@ -447,7 +447,8 @@
(every (lambda (entry)
(match (utmpx-user entry)
((? string?)
(> (utmpx-pid entry) 0))
(or (eqv? (login-type BOOT_TIME) (utmpx-login-type entry))
(> (utmpx-pid entry) 0)))
(#f ;might be DEAD_PROCESS
#t)))
entries))))