@@ -3338,9 +3338,9 @@ static FORCE_INLINE void doBinary(Fiber *fiber, HeapPages *pages, Error *error)
3338
3338
3339
3339
static FORCE_INLINE void doGetArrayPtr (Fiber * fiber , Error * error )
3340
3340
{
3341
- int itemSize = fiber -> code [fiber -> ip ].operand .int32Val [0 ];
3342
- int len = fiber -> code [fiber -> ip ].operand .int32Val [1 ];
3343
- int index = (fiber -> top ++ )-> intVal ;
3341
+ int64_t itemSize = fiber -> code [fiber -> ip ].operand .int32Val [0 ];
3342
+ int64_t len = fiber -> code [fiber -> ip ].operand .int32Val [1 ];
3343
+ int64_t index = (fiber -> top ++ )-> intVal ;
3344
3344
3345
3345
char * data = (char * )fiber -> top -> ptrVal ;
3346
3346
@@ -3358,7 +3358,7 @@ static FORCE_INLINE void doGetArrayPtr(Fiber *fiber, Error *error)
3358
3358
}
3359
3359
3360
3360
if (index < 0 || index > len - 1 )
3361
- error -> runtimeHandler (error -> context , ERR_RUNTIME , "Index %d is out of range 0...%d " , index , len - 1 );
3361
+ error -> runtimeHandler (error -> context , ERR_RUNTIME , "Index %lld is out of range 0...%lld " , index , len - 1 );
3362
3362
3363
3363
fiber -> top -> ptrVal = data + itemSize * index ;
3364
3364
@@ -3371,17 +3371,17 @@ static FORCE_INLINE void doGetArrayPtr(Fiber *fiber, Error *error)
3371
3371
3372
3372
static FORCE_INLINE void doGetDynArrayPtr (Fiber * fiber , Error * error )
3373
3373
{
3374
- int index = (fiber -> top ++ )-> intVal ;
3374
+ int64_t index = (fiber -> top ++ )-> intVal ;
3375
3375
DynArray * array = (DynArray * )(fiber -> top ++ )-> ptrVal ;
3376
3376
3377
3377
if (!array || !array -> data )
3378
3378
error -> runtimeHandler (error -> context , ERR_RUNTIME , "Dynamic array is null" );
3379
3379
3380
- int itemSize = array -> itemSize ;
3381
- int64_t len = getDims (array )-> len ;
3380
+ int64_t itemSize = array -> itemSize ;
3381
+ int64_t len = getDims (array )-> len ;
3382
3382
3383
3383
if (index < 0 || index > len - 1 )
3384
- error -> runtimeHandler (error -> context , ERR_RUNTIME , "Index %d is out of range 0...%d " , index , len - 1 );
3384
+ error -> runtimeHandler (error -> context , ERR_RUNTIME , "Index %lld is out of range 0...%lld " , index , len - 1 );
3385
3385
3386
3386
(-- fiber -> top )-> ptrVal = (char * )array -> data + itemSize * index ;
3387
3387
0 commit comments