** Check whether expression 'e' is a literal integer or float in ** proper range to fit in a register (sB or sC). */
| 1236 | ** proper range to fit in a register (sB or sC). |
| 1237 | */ |
| 1238 | static int isSCnumber (expdesc *e, int *pi, int *isfloat) { |
| 1239 | lua_Integer i; |
| 1240 | if (e->k == VKINT) |
| 1241 | i = e->u.ival; |
| 1242 | else if (e->k == VKFLT && luaV_flttointeger(e->u.nval, &i, F2Ieq)) |
| 1243 | *isfloat = 1; |
| 1244 | else |
| 1245 | return 0; /* not a number */ |
| 1246 | if (!hasjumps(e) && fitsC(i)) { |
| 1247 | *pi = int2sC(cast_int(i)); |
| 1248 | return 1; |
| 1249 | } |
| 1250 | else |
| 1251 | return 0; |
| 1252 | } |
| 1253 | |
| 1254 | |
| 1255 | /* |
no test coverage detected