** return 'l <= r' for non-numbers. */
| 540 | ** return 'l <= r' for non-numbers. |
| 541 | */ |
| 542 | static int lessequalothers (lua_State *L, const TValue *l, const TValue *r) { |
| 543 | lua_assert(!ttisnumber(l) || !ttisnumber(r)); |
| 544 | if (ttisstring(l) && ttisstring(r)) /* both are strings? */ |
| 545 | return l_strcmp(tsvalue(l), tsvalue(r)) <= 0; |
| 546 | else |
| 547 | return luaT_callorderTM(L, l, r, TM_LE); |
| 548 | } |
| 549 | |
| 550 | |
| 551 | /* |
no test coverage detected