diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2016-04-27 06:12:03 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2016-04-27 06:12:03 -0700 |
| commit | c43eb573779da0965ecb84feb23e21b39405bb4b (patch) | |
| tree | 3e0c88b71fee6995be8a81081ffa0c6542a16fca /arith.c | |
| parent | 637617fa71cfb05c2d2ab07f3e820b2eb712049c (diff) | |
| download | txr-c43eb573779da0965ecb84feb23e21b39405bb4b.tar.gz txr-c43eb573779da0965ecb84feb23e21b39405bb4b.tar.bz2 txr-c43eb573779da0965ecb84feb23e21b39405bb4b.zip | |
Adding fixnum-min and fixnum-max variables.
* arith.c (arith_init): Registered fixnum-min and fixnum-max
variables.
* txr.1: Documented.
Diffstat (limited to 'arith.c')
| -rw-r--r-- | arith.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -2355,6 +2355,8 @@ void arith_init(void) reg_varl(intern(lit("flo-max"), user_package), flo(DBL_MAX)); reg_varl(intern(lit("flo-min"), user_package), flo(DBL_MIN)); reg_varl(intern(lit("flo-epsilon"), user_package), flo(DBL_EPSILON)); + reg_varl(intern(lit("fixnum-min"), user_package), num(NUM_MIN)); + reg_varl(intern(lit("fixnum-max"), user_package), num(NUM_MAX)); #ifndef M_PI #define M_PI 3.14159265358979323846 |