summaryrefslogtreecommitdiffstats
path: root/lib.h
diff options
context:
space:
mode:
Diffstat (limited to 'lib.h')
-rw-r--r--lib.h9
1 files changed, 8 insertions, 1 deletions
diff --git a/lib.h b/lib.h
index bc1e9b83..7b69cbbf 100644
--- a/lib.h
+++ b/lib.h
@@ -222,7 +222,6 @@ extern val query_error_s, file_error_s, process_error_s;
extern val nothrow_k, args_k;
-extern val zero, one, two, negone, maxint, minint;
extern val null_string;
extern val null_list; /* (nil) */
@@ -428,3 +427,11 @@ val match(val spec, val data);
obj_t *c_o_n_s ## CAR ## CDR = CONS; \
obj_t *CAR = car(c_o_n_s ## CAR ## CDR); \
obj_t *CDR = cdr(c_o_n_s ## CAR ## CDR)
+
+#define num_fast(n) ((val) ((n << TAG_SHIFT) | TAG_NUM))
+#define zero num_fast(0)
+#define one num_fast(1)
+#define two num_fast(2)
+#define negone num_fast(-1)
+#define maxint num_fast(NUM_MAX)
+#define minint num_fast(NUM_MIN)