sort_comp
if (sort_comp(L, -1, -2)) /* a[u] < a[l]? */
if (sort_comp(L, -2, -1)) /* a[i]<a[l]? */
if (sort_comp(L, -1, -2)) /* a[u]<a[i]? */
while (lua_rawgeti(L, 1, ++i), sort_comp(L, -1, -2)) {
while (lua_rawgeti(L, 1, --j), sort_comp(L, -3, -1)) {