build: 'GUIX_CHECK_GUILE_JSON' really checks for Guile-JSON 3.x.
Until now the 'guile' process would always exit with 0, as long as Guile-JSON is installed, whether it's version 1 or version 3. * m4/guix.m4 (GUIX_CHECK_GUILE_JSON): Fix array syntax and remove catch-all 'match' clause.
This commit is contained in:
parent
23ab21fa9d
commit
611a64bd7e
|
@ -184,9 +184,8 @@ AC_DEFUN([GUIX_CHECK_GUILE_JSON], [
|
||||||
[guix_cv_have_recent_guile_json],
|
[guix_cv_have_recent_guile_json],
|
||||||
[GUILE_CHECK([retval],
|
[GUILE_CHECK([retval],
|
||||||
[(use-modules (json) (ice-9 match))
|
[(use-modules (json) (ice-9 match))
|
||||||
(match (json-string->scm \"[[] { \\\"a\\\": 42 } []]\")
|
(match (json-string->scm \"[[ { \\\"a\\\": 42 } ]]\")
|
||||||
(#(("a" . 42)) #t)
|
(#((("a" . 42))) #t))])
|
||||||
(_ #f))])
|
|
||||||
if test "$retval" = 0; then
|
if test "$retval" = 0; then
|
||||||
guix_cv_have_recent_guile_json="yes"
|
guix_cv_have_recent_guile_json="yes"
|
||||||
else
|
else
|
||||||
|
|
Loading…
Reference in New Issue