Re: iterating over arguments

[Ralf Wildenhues]

* Sam Steingold wrote on Fri, Sep 11, 2009 at 06:24:21PM CEST:
> CL_CLISP_REQUIRE_FEATURE([ffi screen unicode])
> and it will expand into something like
> 
> AC_CACHE_CHECK([for FFI in CLISP], [cl_cv_clisp_ffi],
>  [CLISP_SET(cl_cv_clisp_ffi,[[#+ffi "yes" #-ffi "no"]])])
> test $cl_cv_clisp_ffi = no && AC_MSG_ERROR([FFI is missing in CLISP])
> AC_CACHE_CHECK([for SCREEN in CLISP], [cl_cv_clisp_screen],
>  [CLISP_SET(cl_cv_clisp_screen,[[#+screen "yes" #-screen "no"]])])
> test $cl_cv_clisp_screen = no && AC_MSG_ERROR([SCREEN is missing in CLISP])
> AC_CACHE_CHECK([for UNICODE in CLISP], [cl_cv_clisp_unicode],
>  [CLISP_SET(cl_cv_clisp_unicode,[[#+unicode "yes" #-unicode "no"]])])
> test $cl_cv_clisp_unicode = no && AC_MSG_ERROR([UNICODE is missing in CLISP])

again, completely untested, and probably overquoted in one or two spots:

AC_DEFUN([CL_CLISP_REQUIRE_FEATURE], [dnl
m4_foreach_w([cl_feat], [$1],
[m4_pushdef([CL_FEAT], [m4_toupper([cl_feat])])dnl
AC_CACHE_CHECK([for CL_FEAT in CLISP], [cl_cv_clisp_][cl_feat],
  [CLISP_SET([...])
])
m4_popdef([CL_FEAT])
])
])