diff options
| author | Mathieu Lirzin <mthl@gnu.org> | 2017-04-26 21:54:13 +0200 |
|---|---|---|
| committer | Mathieu Lirzin <mthl@gnu.org> | 2017-09-28 18:13:08 +0200 |
| commit | dd30cb9e547f90d0bffc8eb758c58bba0e2c08ad (patch) | |
| tree | aefb3e175184bd698e54c67ec16d0d44cde4c296 /src/utils.h | |
| parent | d01195784352b29fe13d0676a2f50d60371d007f (diff) | |
| download | mcron-dd30cb9e547f90d0bffc8eb758c58bba0e2c08ad.tar.gz mcron-dd30cb9e547f90d0bffc8eb758c58bba0e2c08ad.tar.bz2 mcron-dd30cb9e547f90d0bffc8eb758c58bba0e2c08ad.zip | |
utils: Add 'assq_symbol_set_x' function
* src/utils.c (assq_symbol_set_x): New function.
* src/mcron.c (parse_opt): Use it.
Diffstat (limited to 'src/utils.h')
| -rw-r--r-- | src/utils.h | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/utils.h b/src/utils.h index 5a71afd..910483f 100644 --- a/src/utils.h +++ b/src/utils.h @@ -19,9 +19,15 @@ #ifndef MCRON_UTILS_H #define MCRON_UTILS_H +#include <libguile.h> + /** Append DIR in front of ENVAR environment variable value. If ENVAR is not defined, then define it with DIR. Bail out if something went wrong. */ extern void wrap_env_path (const char *envar, const char *dir); +/** + In the association list pointed by ALST, set SYMBOL to VAL. */ +extern void assq_symbol_set_x (SCM *alst, const char *symbol, SCM val); + #endif /* MCRON_UTILS_H */ |