From a472c6f1c6bf2f1f17a90ef510ede6162f739053 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Tue, 22 Dec 2020 21:05:38 -0500
Subject: Check that argument to Floor is a number in VM

---
 docs/bqn.js | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'docs')

diff --git a/docs/bqn.js b/docs/bqn.js
index 954439a3..29201421 100644
--- a/docs/bqn.js
+++ b/docs/bqn.js
@@ -132,6 +132,10 @@ let log = (x,w) => {
   }
   throw Error("⋆⁼: Arguments must be numbers");
 }
+let floor = (x,w) => {
+  if (isnum(x)) return Math.floor(x);
+  throw Error("⌊𝕩: Argument must be a number");
+}
 let lesseq = (x,w) => {
   let s=typeof w, t=typeof x;
   return +(s!==t ? s<=t : w<=x);
@@ -186,7 +190,7 @@ let provide = [
  ,times                                        // ×
  ,divide                                       // ÷
  ,power                                        // ⋆
- ,(x,w) => Math.floor(x)                       // ⌊
+ ,floor                                        // ⌊
  ,(x,w) => has(w)?+(x===w):x.sh?x.sh.length:0  // =
  ,lesseq                                       // ≤
  ,(x,w) => list(x.sh)                          // ≢
-- 
cgit v1.2.3