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