diff options
| author | Peter Mikkelsen <petermikkelsen10@gmail.com> | 2022-01-28 19:42:03 +0000 |
|---|---|---|
| committer | Peter Mikkelsen <petermikkelsen10@gmail.com> | 2022-01-28 19:42:03 +0000 |
| commit | 8ab9401c22502520bf3100f864a306a451e5d44a (patch) | |
| tree | b6934759a77f0bff0f3fc12b5f60b3b2264dd974 /functions.c | |
| parent | 9c1040d7721fc0dcb7781f504cbfe60aa90c177b (diff) | |
Make ⍳Y generate correct results when Y contains zeros
Diffstat (limited to 'functions.c')
| -rw-r--r-- | functions.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/functions.c b/functions.c index 1479af0..d96deb6 100644 --- a/functions.c +++ b/functions.c @@ -585,7 +585,7 @@ fnIndexGenerator(Array *right) if(right->size == 0) return rundfn(L"⊂⍬", nil, nil, nil, nil); else - result = rundfn(L"↑,⌾⌿⍳¨⍵", nil, nil, nil, right); + result = rundfn(L"⊃⍣(0<≢⍵),⌾⌿⍳¨⍵", nil, nil, nil, right); }else throwerror(nil, ERank); return result; |