diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2020-04-22 19:20:43 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2020-04-22 19:20:43 -0700 |
commit | 1bbd2db0de63a5f884db060989539e99db0063a7 (patch) | |
tree | 278d9b5a98b9302e133daff2390734a01d6a53c4 | |
parent | 423d823c227f8c8ffb41ef32c6909e77e1ccd8f3 (diff) | |
download | txr-1bbd2db0de63a5f884db060989539e99db0063a7.tar.gz txr-1bbd2db0de63a5f884db060989539e99db0063a7.tar.bz2 txr-1bbd2db0de63a5f884db060989539e99db0063a7.zip |
arith: move c_unum and unum declaration into lib.h
The c_unum and unum functions are fairly often needed
and and are closely related to c_num and num, which have
always been declared in lib.h even though they live in
arith.c. Files not doing arithmetic are including "arith.h"
just for the sake of c_num or unum.
* arith.h (c_unum, unum): Declarations removed.
* lib.h (c_unum, unum): Declarations moved here.
* chksum.c, debug.c, stream.c, strudel.c, sysif.c, vm.c:
These files no longer require #include "arith.h" as a result,
which is therefore removed.
-rw-r--r-- | arith.h | 2 | ||||
-rw-r--r-- | chksum.c | 1 | ||||
-rw-r--r-- | debug.c | 1 | ||||
-rw-r--r-- | lib.h | 2 | ||||
-rw-r--r-- | stream.c | 1 | ||||
-rw-r--r-- | strudel.c | 1 | ||||
-rw-r--r-- | sysif.c | 1 | ||||
-rw-r--r-- | vm.c | 1 |
8 files changed, 2 insertions, 8 deletions
@@ -39,8 +39,6 @@ val bignum_dbl_ipt(double_intptr_t di); val bignum_dbl_uipt(double_uintptr_t dui); #endif val in_int_ptr_range(val bignum); -ucnum c_unum(val num); -val unum(ucnum u); #if HAVE_DOUBLE_INTPTR_T double_intptr_t c_dbl_num(val num); double_uintptr_t c_dbl_unum(val num); @@ -40,7 +40,6 @@ #include "unwind.h" #include "eval.h" #include "stream.h" -#include "arith.h" #include "utf8.h" #include "buf.h" #include "chksums/sha256.h" @@ -40,7 +40,6 @@ #include "parser.h" #include "struct.h" #include "eval.h" -#include "arith.h" #include "txr.h" #include "debug.h" @@ -711,8 +711,10 @@ val memp(val key, val plist); val plist_to_alist(val list); val improper_plist_to_alist(val list, val boolean_keys); val num(cnum val); +val unum(ucnum u); val flo(double val); cnum c_num(val num); +ucnum c_unum(val num); cnum c_fixnum(val num, val self); double c_flo(val self, val num); val fixnump(val num); @@ -71,7 +71,6 @@ #include "eval.h" #include "regex.h" #include "txr.h" -#include "arith.h" #include "buf.h" /* Adhere to ISO C rules about direction switching on update streams. */ @@ -37,7 +37,6 @@ #include "gc.h" #include "eval.h" #include "struct.h" -#include "arith.h" #include "buf.h" #include "strudel.h" @@ -96,7 +96,6 @@ #include "eval.h" #include "args.h" #include "struct.h" -#include "arith.h" #include "itypes.h" #include "txr.h" #include "sysif.h" @@ -43,7 +43,6 @@ #include "args.h" #include "itypes.h" #include "buf.h" -#include "arith.h" #include "vmop.h" #include "vm.h" |