From 733a7df549aa7bb7a7bb727a25235f25db875ecd Mon Sep 17 00:00:00 2001
From: Akshay <nerdy@peppe.rs>
Date: Wed, 31 Mar 2021 20:22:04 +0530
Subject: introduce basic canvas primitive functions

---
 src/lisp/number.rs | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src/lisp/number.rs')

diff --git a/src/lisp/number.rs b/src/lisp/number.rs
index 0ce5ac0..4ca890a 100644
--- a/src/lisp/number.rs
+++ b/src/lisp/number.rs
@@ -26,6 +26,12 @@ impl LispNumber {
             });
         }
     }
+    pub fn unwrap_integer(self) -> i64 {
+        match self {
+            Self::Integer(x) => x,
+            Self::Float(x) => x.floor() as i64, // lossy
+        }
+    }
 }
 
 impl Add for LispNumber {
-- 
cgit v1.2.3