mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-29 08:20:20 +02:00
Code Activity

(trunc): Remove #define to scm_truncate when the C library

Browse source 
doesn't provide trunc.  This was for when `truncate' was done as a
scm_tc7_dsubr, no longer required.
This commit is contained in:
Kevin Ryde 2004-05-18 23:45:34 +00:00
parent bae30667b0
commit faff1f2fda
1 changed files with 0 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/numbers.c
View file

@ -4937,7 +4937,6 @@ scm_truncate (double x)
#if HAVE_TRUNC
return trunc (x);
#else
#define trunc scm_truncate
if (x < 0.0)
return -floor (-x);
return floor (x);