services: configuration: simplify alist? procedure.
* gnu/services/configuration.scm (alist?): simplify procedure. Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>master
parent
a586c3996e
commit
eba81e68ac
|
@ -440,10 +440,7 @@ the list result in @code{#t} when applying PRED? on them."
|
||||||
(list-of string?))
|
(list-of string?))
|
||||||
|
|
||||||
(define alist?
|
(define alist?
|
||||||
(match-lambda
|
(list-of pair?))
|
||||||
(() #t)
|
|
||||||
((head . tail) (and (pair? head) (alist? tail)))
|
|
||||||
(_ #f)))
|
|
||||||
|
|
||||||
(define serialize-file-like empty-serializer)
|
(define serialize-file-like empty-serializer)
|
||||||
|
|
||||||
|
|
Reference in New Issue