aboutsummaryrefslogtreecommitdiff
path: root/lvm.c
diff options
context:
space:
mode:
Diffstat (limited to 'lvm.c')
-rw-r--r--lvm.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/lvm.c b/lvm.c
index 754d608b..5c15c353 100644
--- a/lvm.c
+++ b/lvm.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lvm.c,v 2.122 2010/06/07 16:55:34 roberto Exp roberto $ 2** $Id: lvm.c,v 2.123 2010/06/30 14:11:17 roberto Exp roberto $
3** Lua virtual machine 3** Lua virtual machine
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -421,7 +421,7 @@ void luaV_finishOp (lua_State *L) {
421 case OP_CONCAT: { 421 case OP_CONCAT: {
422 StkId top = L->top - 1; /* top when 'call_binTM' was called */ 422 StkId top = L->top - 1; /* top when 'call_binTM' was called */
423 int b = GETARG_B(inst); /* first element to concatenate */ 423 int b = GETARG_B(inst); /* first element to concatenate */
424 int total = top - 1 - (base + b); /* elements yet to concatenate */ 424 int total = cast_int(top - 1 - (base + b)); /* yet to concatenate */
425 setobj2s(L, top - 2, top); /* put TM result in proper position */ 425 setobj2s(L, top - 2, top); /* put TM result in proper position */
426 if (total > 1) { /* are there elements to concat? */ 426 if (total > 1) { /* are there elements to concat? */
427 L->top = top - 1; /* top is one after last element (at top-2) */ 427 L->top = top - 1; /* top is one after last element (at top-2) */