diff options
Diffstat (limited to 'm4/guix.m4')
-rw-r--r-- | m4/guix.m4 | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/m4/guix.m4 b/m4/guix.m4 index 6cf1b01c90..4fdc409602 100644 --- a/m4/guix.m4 +++ b/m4/guix.m4 @@ -67,3 +67,20 @@ AC_DEFUN([GUIX_SYSTEM_TYPE], [ AC_SUBST([guix_system]) ]) + +dnl GUIX_ASSERT_GUILE_FEATURES FEATURES +dnl +dnl Assert that FEATURES are provided by $GUILE. +AC_DEFUN([GUIX_ASSERT_GUILE_FEATURES], [ + for guix_guile_feature in $1 + do + AC_MSG_CHECKING([whether $GUILE provides feature '$guix_guile_feature']) + if "$GUILE" -c "(exit (provided? '$guix_guile_feature))" + then + AC_MSG_RESULT([yes]) + else + AC_MSG_RESULT([no]) + AC_MSG_ERROR([$GUILE does not support feature '$guix_guile_feature', which is required.]) + fi + done +]) |