relax take/drop overflow checking
This commit is contained in:
parent
0f691138c9
commit
ffffdb5895
@ -639,12 +639,12 @@ B take_c2(B t, B w, B x) {
|
|||||||
TAKEDROP_INIT(1);
|
TAKEDROP_INIT(1);
|
||||||
|
|
||||||
if (n>=0) {
|
if (n>=0) {
|
||||||
CHECK_IA(n, 8);
|
if (n != (usz)n) thrOOM();
|
||||||
a = take_impl(n, x);
|
a = take_impl(n, x);
|
||||||
if (xr==1) return taga(arr_shVec(a));
|
if (xr==1) return taga(arr_shVec(a));
|
||||||
} else {
|
} else {
|
||||||
n = -n;
|
n = -n;
|
||||||
CHECK_IA(n, 8);
|
if (n != (usz)n) thrOOM();
|
||||||
usz xia = IA(x);
|
usz xia = IA(x);
|
||||||
if (n>xia) {
|
if (n>xia) {
|
||||||
B xf = getFillE(x);
|
B xf = getFillE(x);
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user