** return 'l <= r' for non-numbers. */
| 547 | ** return 'l <= r' for non-numbers. |
| 548 | */ |
| 549 | static int lessequalothers (lua_State *L, const TValue *l, const TValue *r) { |
| 550 | lua_assert(!ttisnumber(l) || !ttisnumber(r)); |
| 551 | if (ttisstring(l) && ttisstring(r)) /* both are strings? */ |
| 552 | return l_strcmp(tsvalue(l), tsvalue(r)) <= 0; |
| 553 | else |
| 554 | return luaT_callorderTM(L, l, r, TM_LE); |
| 555 | } |
| 556 | |
| 557 | |
| 558 | /* |
no test coverage detected