193 static void auxsort (lua_State *L, int l, int u) {  in auxsort()  argument
194   while (l < u) {  /* for tail recursion */  in auxsort()
197     lua_rawgeti(L, 1, l);  in auxsort()
200       set2(L, l, u);  /* swap a[l] - a[u] */  in auxsort()
203     if (u-l == 1) break;  /* only 2 elements */  in auxsort()
204     i = (l+u)/2;  in auxsort()
206     lua_rawgeti(L, 1, l);  in auxsort()
208       set2(L, i, l);  in auxsort()
217     if (u-l == 2) break;  /* only 3 elements */  in auxsort()
223     i = l; j = u-1;  in auxsort()
232         if (j<l) luaL_error(L, "invalid order function for sorting");  in auxsort()
246     if (i-l < u-i) {  in auxsort()
247       j=l; i=i-1; l=i+2;  in auxsort()