Merge pull request #3 from mlochbaum/master

Don't allow First of empty or reshaping empty to non-empty
This commit is contained in:
dzaima 2021-08-08 12:36:18 +03:00 committed by GitHub
commit 53bcd50d3f
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -131,7 +131,7 @@ B shape_c2(B t, B w, B x) {
xf = getFillQ(x);
if (xia<=1) {
if (xia==0) {
if (xf.u == bi_noFill.u) thrM("⥊: No fill for empty array");
thrM("⥊: Empty 𝕩 and non-empty result");
dec(x);
x = inc(xf);
} else {
@ -187,6 +187,7 @@ extern B rt_pick;
B pick_c1(B t, B x) {
if (isAtm(x)) return x;
if (a(x)->ia==0) {
thrM("⊑: Argument cannot be empty");
B r = getFillE(x);
dec(x);
return r;