fix 𝕨⥊𝕩 integer overflow
This commit is contained in:
parent
054cdac6d9
commit
879a3e2007
@ -320,6 +320,7 @@ B shape_c2(B t, B w, B x) {
|
|||||||
return withFill(taga(arr_shSetUO(mut_fp(m), nr, sh)), xf);
|
return withFill(taga(arr_shSetUO(mut_fp(m), nr, sh)), xf);
|
||||||
}
|
}
|
||||||
u8 xk = xl - 3;
|
u8 xk = xl - 3;
|
||||||
|
if (nia >= USZ_MAX) thrOOM();
|
||||||
rp = m_tyarrp(&r, 1<<xk, nia, xt);
|
rp = m_tyarrp(&r, 1<<xk, nia, xt);
|
||||||
bi = (u64)xia<<xk;
|
bi = (u64)xia<<xk;
|
||||||
bf = (u64)nia<<xk;
|
bf = (u64)nia<<xk;
|
||||||
|
|||||||
@ -380,6 +380,8 @@ b←1↓1∾a←"hello" ⋄ b ⌽⎊'e' ⥊⟜1⍟2 5 ⋄ a ≡○•Hash b %% 1
|
|||||||
|
|
||||||
# 𝕨⥊𝕩
|
# 𝕨⥊𝕩
|
||||||
!"𝕨⥊𝕩: Result rank too large" % (0∾300⥊2)⥊0
|
!"𝕨⥊𝕩: Result rank too large" % (0∾300⥊2)⥊0
|
||||||
|
!"Out of memory" % %USE eqerr ⋄ {(𝕩⥊2) ⥊ 1.1}¨_eqerr 63-↕10
|
||||||
|
!"Out of memory" % %USE eqerr ⋄ {(𝕩⥊2) ⥊ 7⥊1.1}¨_eqerr 63-↕10
|
||||||
|
|
||||||
# 𝕨⍷𝕩
|
# 𝕨⍷𝕩
|
||||||
%USE eqvar ⋄ "ab" ⍷_eqvar "" %% ⟨⟩
|
%USE eqvar ⋄ "ab" ⍷_eqvar "" %% ⟨⟩
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user