summaryrefslogtreecommitdiff
path: root/libguile/numbers.h
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2013-12-20 18:12:37 -0500
committerMark H Weaver <mhw@netris.org>2014-01-08 21:42:16 -0500
commit900a897cd31df98df06b84a478b77a7438739b54 (patch)
treed165b8b39954d1c004780e34974c1ab211754cce /libguile/numbers.h
parentf659df44954a7f182361395396c5e0340b08c7dd (diff)
downloadguile-900a897cd31df98df06b84a478b77a7438739b54.tar.gz
Implement 'exact-integer?' and 'scm_is_exact_integer'.
* libguile/numbers.c (scm_exact_integer_p, scm_is_exact_integer): New procedures. (scm_integer_p): Improve docstring. * libguile/numbers.h (scm_exact_integer_p, scm_is_exact_integer): New prototypes. * doc/ref/api-data.texi (Integers): Add docs. * test-suite/tests/numbers.test ("exact-integer?"): Add tests.
Diffstat (limited to 'libguile/numbers.h')
-rw-r--r--libguile/numbers.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/libguile/numbers.h b/libguile/numbers.h
index 912f287bb..4d977dc3c 100644
--- a/libguile/numbers.h
+++ b/libguile/numbers.h
@@ -243,6 +243,7 @@ SCM_API SCM scm_complex_p (SCM x);
SCM_API SCM scm_real_p (SCM x);
SCM_API SCM scm_rational_p (SCM z);
SCM_API SCM scm_integer_p (SCM x);
+SCM_API SCM scm_exact_integer_p (SCM x);
SCM_API SCM scm_inexact_p (SCM x);
SCM_API int scm_is_inexact (SCM x);
SCM_API SCM scm_num_eq_p (SCM x, SCM y);
@@ -331,6 +332,7 @@ SCM_INTERNAL void scm_i_print_complex (double real, double imag, SCM port);
/* conversion functions for integers */
SCM_API int scm_is_integer (SCM val);
+SCM_API int scm_is_exact_integer (SCM val);
SCM_API int scm_is_signed_integer (SCM val,
scm_t_intmax min, scm_t_intmax max);
SCM_API int scm_is_unsigned_integer (SCM val,