1 files changed, 2 insertions, 0 deletions
diff --git a/lib.h b/lib.h
index b2cadfac..f3d45e2b 100644
--- a/lib.h
+++ b/lib.h
@@ -768,6 +768,8 @@ val plist_to_alist(val list);
 val improper_plist_to_alist(val list, val boolean_keys);
 val num(cnum val);
 val unum(ucnum u);
+#define num_ex(x) if3((x) > (ucnum) INT_PTR_MAX, unum(x), num(x))
+
 val flo(double val);
 cnum c_num(val num, val self);
 ucnum c_unum(val num, val self);