summaryrefslogtreecommitdiffstats
path: root/arith.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-05-24 07:19:46 -0700
committerKaz Kylheku <kaz@kylheku.com>2017-05-24 07:19:46 -0700
commit7c6f1e1ecbd635eb328f6b3e1ebd0b22f9d71594 (patch)
treedeb64eeb9901d165d1788532d539889e1806c868 /arith.c
parent6ba995ca8bcb9e20965fd2c09876eeb44c777f59 (diff)
downloadtxr-7c6f1e1ecbd635eb328f6b3e1ebd0b22f9d71594.tar.gz
txr-7c6f1e1ecbd635eb328f6b3e1ebd0b22f9d71594.tar.bz2
txr-7c6f1e1ecbd635eb328f6b3e1ebd0b22f9d71594.zip
bits: external linkage.
* arith.c (bits): Change the linkage from internal to external. * arith.h (bits): Declared.
Diffstat (limited to 'arith.c')
-rw-r--r--arith.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/arith.c b/arith.c
index a4a65ad7..62fdea53 100644
--- a/arith.c
+++ b/arith.c
@@ -2767,12 +2767,11 @@ val width(val obj)
uw_throwf(error_s, lit("integer-length: ~s isn't an integer"), obj, nao);
}
-static val bits(val obj)
+val bits(val obj)
{
return normalize(bignum_from_uintptr(coerce(uint_ptr_t, obj)));
}
-
void arith_init(void)
{
mp_init(&NUM_MAX_MP);