diff options
Diffstat (limited to 'libguile/conv-uinteger.i.c')
-rw-r--r-- | libguile/conv-uinteger.i.c | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/libguile/conv-uinteger.i.c b/libguile/conv-uinteger.i.c index 52f49f772..d6b969c20 100644 --- a/libguile/conv-uinteger.i.c +++ b/libguile/conv-uinteger.i.c @@ -54,13 +54,8 @@ SCM_TO_TYPE_PROTO (SCM val) return n; #else -#if TYPE_MIN == 0 - if (n <= TYPE_MAX) - return n; -#else /* TYPE_MIN != 0 */ if (n >= TYPE_MIN && n <= TYPE_MAX) return n; -#endif /* TYPE_MIN != 0 */ else goto out_of_range; @@ -83,13 +78,8 @@ SCM_TO_TYPE_PROTO (SCM val) mpz_export (&n, &count, 1, sizeof (TYPE), 0, 0, SCM_I_BIG_MPZ (val)); -#if TYPE_MIN == 0 - if (n <= TYPE_MAX) - return n; -#else /* TYPE_MIN != 0 */ if (n >= TYPE_MIN && n <= TYPE_MAX) return n; -#endif /* TYPE_MIN != 0 */ else goto out_of_range; |