aboutsummaryrefslogtreecommitdiff
path: root/ltablib.c
diff options
context:
space:
mode:
Diffstat (limited to 'ltablib.c')
-rw-r--r--ltablib.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/ltablib.c b/ltablib.c
index 85004770..52595fab 100644
--- a/ltablib.c
+++ b/ltablib.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ltablib.c,v 1.76 2014/09/22 06:42:15 roberto Exp roberto $ 2** $Id: ltablib.c,v 1.77 2014/10/17 16:28:21 roberto Exp roberto $
3** Library for Table Manipulation 3** Library for Table Manipulation
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -225,7 +225,7 @@ static int unpack (lua_State *L) {
225/* 225/*
226** {====================================================== 226** {======================================================
227** Quicksort 227** Quicksort
228** (based on `Algorithms in MODULA-3', Robert Sedgewick; 228** (based on 'Algorithms in MODULA-3', Robert Sedgewick;
229** Addison-Wesley, 1993.) 229** Addison-Wesley, 1993.)
230** ======================================================= 230** =======================================================
231*/ 231*/
@@ -241,7 +241,7 @@ static int sort_comp (lua_State *L, int a, int b) {
241 int res; 241 int res;
242 lua_pushvalue(L, 2); 242 lua_pushvalue(L, 2);
243 lua_pushvalue(L, a-1); /* -1 to compensate function */ 243 lua_pushvalue(L, a-1); /* -1 to compensate function */
244 lua_pushvalue(L, b-2); /* -2 to compensate function and `a' */ 244 lua_pushvalue(L, b-2); /* -2 to compensate function and 'a' */
245 lua_call(L, 2, 1); 245 lua_call(L, 2, 1);
246 res = lua_toboolean(L, -1); 246 res = lua_toboolean(L, -1);
247 lua_pop(L, 1); 247 lua_pop(L, 1);