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