/* Check whether integer 'i' is less than or equal to float 'f'. See comments on previous function.  */
l_sinline int LEintfloat(lua_Integer i, lua_Number f)
/* Check whether integer 'i' is less than or equal to float 'f'. See comments on previous function.  */
l_sinline int LEintfloat(lua_Integer i, lua_Number f)
{
    lua_Integer fi;
    if (luaV_flttointeger(f, &fi, F2Ifloor))
      return i <= fi;
    else
      return f > 0;
  }
}