mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-12 06:41:13 +02:00
Code Activity

* numbers.c: If we're supporting floating-point, provide the

Browse source 
feature "inexact".
This commit is contained in:
Jim Blandy 1999-05-02 17:22:39 +00:00
parent 3056083816
commit 7e5d120953
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/numbers.c
View file

@ -4803,6 +4803,7 @@ void
scm_init_numbers () scm_init_numbers ()
{ {
#ifdef SCM_FLOATS #ifdef SCM_FLOATS
scm_add_feature("inexact");
SCM_NEWCELL (scm_flo0); SCM_NEWCELL (scm_flo0);
#ifdef SCM_SINGLES #ifdef SCM_SINGLES
SCM_SETCAR (scm_flo0, scm_tc_flo); SCM_SETCAR (scm_flo0, scm_tc_flo);