aboutsummaryrefslogtreecommitdiff
path: root/docs/bqn.js
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2022-08-30 08:03:29 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2022-08-30 08:03:33 -0400
commit177bc8a2d6ec8c5f13bb73da387cfefbd6fa0c1d (patch)
tree3b33040f35f4b56891ae6e8666094b38fcbb21f4 /docs/bqn.js
parent6dfadcf6d8d606236f3f7c90af8cbe120ce78036 (diff)
Don't allow Conjugate (monadic +) on non-number atoms
Diffstat (limited to 'docs/bqn.js')
-rw-r--r--docs/bqn.js5
1 files changed, 4 insertions, 1 deletions
diff --git a/docs/bqn.js b/docs/bqn.js
index b64ea1cc..0f310dbd 100644
--- a/docs/bqn.js
+++ b/docs/bqn.js
@@ -227,7 +227,10 @@ let m1 = m=>{let r= f =>setrepr(()=>[4,f,r ], m(f )); r.m=1; return r;}
let m2 = m=>{let r=(f,g)=>setrepr(()=>[5,f,r,g], m(f,g)); r.m=2; return r;}
let ctrans = (c,t) => String.fromCodePoint(c.codePointAt(0)+t);
let plus = (x,w) => {
- if (!has(w)) return x;
+ if (!has(w)) {
+ if (!isnum(x)) throw Error("+: Argument must be a number");
+ return x;
+ }
let s=typeof w, t=typeof x;
if (s==="number" && t==="number") return w+x;
if (s==="number" && t==="string") return ctrans(x,w);