diff options
| author | Andy Wingo <wingo@pobox.com> | 2021-12-13 10:51:15 +0100 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2022-01-13 09:37:16 +0100 |
| commit | 99b046d58bd02a916703c9d1f75bd3d5c6cf9ebf (patch) | |
| tree | 4b26ef7982f4143ce9f6e7b00312a03c8449df2f /libguile/integers.h | |
| parent | 0ccdf06c81b73ff476aff684dc27c9b6156ca34d (diff) | |
| download | guile-99b046d58bd02a916703c9d1f75bd3d5c6cf9ebf.tar.gz | |
Implement centered-remainder with new integer lib
* libguile/integers.c (scm_integer_centered_remainder_ii)
(scm_integer_centered_remainder_iz, scm_integer_centered_remainder_zi)
(scm_integer_centered_remainder_zz): New internal functions.
* libguile/integers.h: Declare internal functions.
* libguile/numbers.c (scm_centered_remainder): Use the new functions.
(scm_i_bigint_centered_remainder): Remove helper.
Diffstat (limited to 'libguile/integers.h')
| -rw-r--r-- | libguile/integers.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/libguile/integers.h b/libguile/integers.h index 44dc0e376..13c69e374 100644 --- a/libguile/integers.h +++ b/libguile/integers.h @@ -91,6 +91,11 @@ SCM_INTERNAL SCM scm_integer_centered_quotient_iz (scm_t_inum x, SCM y); SCM_INTERNAL SCM scm_integer_centered_quotient_zi (SCM x, scm_t_inum y); SCM_INTERNAL SCM scm_integer_centered_quotient_zz (SCM x, SCM y); +SCM_INTERNAL SCM scm_integer_centered_remainder_ii (scm_t_inum x, scm_t_inum y); +SCM_INTERNAL SCM scm_integer_centered_remainder_iz (scm_t_inum x, SCM y); +SCM_INTERNAL SCM scm_integer_centered_remainder_zi (SCM x, scm_t_inum y); +SCM_INTERNAL SCM scm_integer_centered_remainder_zz (SCM x, SCM y); + #endif /* SCM_INTEGERS_H */ |