diff options
| author | Andy Wingo <wingo@pobox.com> | 2021-12-19 10:03:31 +0100 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2022-01-13 09:37:16 +0100 |
| commit | 4a380aa6ac331500faf52a2c599abac06dd7855b (patch) | |
| tree | 4dd9ed842058ee6e2768d3092d8cc5aa7b789911 /libguile/integers.h | |
| parent | 6fa9fcb313e75164316dbc048aba4cd65e531676 (diff) | |
| download | guile-4a380aa6ac331500faf52a2c599abac06dd7855b.tar.gz | |
Implement scm_logand with new integer library
* libguile/integers.c (scm_integer_logand_ii, scm_integer_logand_zi)
(scm_integer_logand_zz): New internal functions.
* libguile/integers.h: Declare the new internal functions.
* libguile/numbers.c (scm_logand): Use new internal functions.
Diffstat (limited to 'libguile/integers.h')
| -rw-r--r-- | libguile/integers.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libguile/integers.h b/libguile/integers.h index 31407b79e..d2ab465d7 100644 --- a/libguile/integers.h +++ b/libguile/integers.h @@ -132,6 +132,10 @@ SCM_INTERNAL SCM scm_integer_lcm_ii (scm_t_inum x, scm_t_inum y); SCM_INTERNAL SCM scm_integer_lcm_zi (SCM x, scm_t_inum y); SCM_INTERNAL SCM scm_integer_lcm_zz (SCM x, SCM y); +SCM_INTERNAL SCM scm_integer_logand_ii (scm_t_inum x, scm_t_inum y); +SCM_INTERNAL SCM scm_integer_logand_zi (SCM x, scm_t_inum y); +SCM_INTERNAL SCM scm_integer_logand_zz (SCM x, SCM y); + #endif /* SCM_INTEGERS_H */ |