** return 'l <= r' for non-numbers. */
| 554 | ** return 'l <= r' for non-numbers. |
| 555 | */ |
| 556 | static int lessequalothers (lua_State *L, const TValue *l, const TValue *r) { |
| 557 | lua_assert(!ttisnumber(l) || !ttisnumber(r)); |
| 558 | if (ttisstring(l) && ttisstring(r)) /* both are strings? */ |
| 559 | return l_strcmp(tsvalue(l), tsvalue(r)) <= 0; |
| 560 | else |
| 561 | return luaT_callorderTM(L, l, r, TM_LE); |
| 562 | } |
| 563 | |
| 564 | |
| 565 | /* |
no test coverage detected