From c25380c28da154b271d91543e61e27ae974e9ecc Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Tue, 23 May 2017 09:50:11 -0300 Subject: details (using proper version of 'setobj') --- lvm.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lvm.c') diff --git a/lvm.c b/lvm.c index 453ba2d4..9cbb9f45 100644 --- a/lvm.c +++ b/lvm.c @@ -1,5 +1,5 @@ /* -** $Id: lvm.c,v 2.283 2017/05/18 19:34:39 roberto Exp roberto $ +** $Id: lvm.c,v 2.284 2017/05/18 19:44:19 roberto Exp roberto $ ** Lua virtual machine ** See Copyright Notice in lua.h */ @@ -690,13 +690,13 @@ void luaV_finishOp (lua_State *L) { StkId top = L->top - 1; /* top when 'luaT_trybinTM' was called */ int b = GETARG_B(inst); /* first element to concatenate */ int total = cast_int(top - 1 - (base + b)); /* yet to concatenate */ - setobj2s(L, top - 2, top); /* put TM result in proper position */ + setobjs2s(L, top - 2, top); /* put TM result in proper position */ if (total > 1) { /* are there elements to concat? */ L->top = top - 1; /* top is one after last element (at top-2) */ luaV_concat(L, total); /* concat them (may yield again) */ } /* move final result to final position */ - setobj2s(L, ci->func + 1 + GETARG_A(inst), L->top - 1); + setobjs2s(L, ci->func + 1 + GETARG_A(inst), L->top - 1); L->top = ci->top; /* restore top */ break; } -- cgit v1.2.3-55-g6feb