** returns the index for 'k' if 'k' is an appropriate key to live in ** the array part of a table, 0 otherwise. */
| 316 | ** the array part of a table, 0 otherwise. |
| 317 | */ |
| 318 | static unsigned int arrayindex (lua_Integer k) { |
| 319 | if (l_castS2U(k) - 1u < MAXASIZE) /* 'k' in [1, MAXASIZE]? */ |
| 320 | return cast_uint(k); /* 'key' is an appropriate array index */ |
| 321 | else |
| 322 | return 0; |
| 323 | } |
| 324 | |
| 325 | |
| 326 | /* |