HCoop
/
bpt
/
guile.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
e45fb18
)
(NUM2INTEGRAL): Test BIGMPZ_FITSP with "!= 0" to
author
Kevin Ryde
<user42@zip.com.au>
Tue, 27 Apr 2004 22:16:12 +0000
(22:16 +0000)
committer
Kevin Ryde
<user42@zip.com.au>
Tue, 27 Apr 2004 22:16:12 +0000
(22:16 +0000)
avoid warning from gcc 3.4. Reported by Hyperdivision.
libguile/num2integral.i.c
patch
|
blob
|
blame
|
history
diff --git
a/libguile/num2integral.i.c
b/libguile/num2integral.i.c
index
7d792ce
..
4581d8b
100644
(file)
--- a/
libguile/num2integral.i.c
+++ b/
libguile/num2integral.i.c
@@
-79,7
+79,7
@@
NUM2INTEGRAL (SCM num, unsigned long int pos, const char *s_caller)
else
{
/* make sure the result will fit */
- if (BIGMPZ_FITSP)
+ if (BIGMPZ_FITSP
!= 0
)
{
int fits_p = BIGMPZ_FITSP (SCM_I_BIG_MPZ (num));
scm_remember_upto_here_1 (num);