多次调用loadbuffer后的lua行号

2013-6-7 9:17:7
收藏：0
阅读：143
评论：3

我使用loadbuffer将两个字符串加载到同一个lua_state中。

例如：

function f ()

    print( "Hello World!")
end

和

function g ()

    f(
end

第二个字符串中遗忘了一个 )，会抛出一个错误：

[string "line2"]:9: unexpected Symbol

但是9是第一字符串和第二字符串的行数之和。行数应该是3。

有没有办法在调用loadbuffer之前重置行号计数器？

点赞
用户2458544
用户2458544

我猜这个链接描述了你的情况： http://www.corsix.org/content/common-lua-pitfall-loading-code

您正在加载两个信息块，调用这些块将它们依次放入全局表中。 lua_pcall（L，0，0，0）; 不会调用您的 f() 和 g()，而是按顺序构造您的Lua代码。

您的代码可能可以简化为：

if (luaL_dostring(L, str.c_str()))
{
    printf("%s\n", lua_tostring(L, -1));
}
if (luaL_dostring(L, str2.c_str()));
{
    printf("%s\n", lua_tostring(L, -1));
}

这样还可以保护不会在不成功加载块时调用该块；

2013-06-07 09:35:29
用户1863443
用户1863443

你是对的Enigma，str2中的代码是连续添加的。在lparser.cpp中的

static void statement (LexState *ls) {

中设置断点可以看到，对于str，LexState.linenumber为5和7，而对于str2，LexState.linenumber为5、7、14和16。 因此，str被词法分析并添加到VM中两次。 我将寻找一种将由多个文件组成的脚本放入一个VM中的不同方法。

2013-06-08 13:20:04
用户1863443
用户1863443

如果有需要的话，可以添加以下函数到 lauxlib.h 中：

LUALIB_API int (luaL_loadbuffers) (lua_State *L, size_t count, const char **buff, size_t *sz,
                                   const char **name, const char *mode);

并且添加以下内容到 lauxlib.c 中：

#include"lzio.h"
#include"ldo.h"
#include"ltable.h"
#include"lgc.h"
LUALIB_API int luaL_loadbuffers (lua_State *L, size_t count, const char **buff, size_t *sz,
                                   const char **name, const char *mode)
{
    ZIO z;
    int status;

    int i;

    for( i=0; i<count; i++)
    {
        LoadS ls;
        ls.s = buff[i];
        ls.size = sz[i];

        lua_lock(L);

        luaZ_init(L, &z, getS, &ls);
        status = luaD_protectedparser(L, &z, name[i], mode);

        if (status == LUA_OK) {  /* no errors? */
            LClosure *f = clLvalue(L->top - 1);  /* get newly created function */
            if (f->nupvalues == 1) {  /* does it have one upvalue? */

                /* get global table from registry */
                Table *reg = hvalue(&G(L)->l_registry);
                const TValue *gt = luaH_getint(reg, LUA_RIDX_GLOBALS);
                /* set global table as 1st upvalue of 'f' (may be LUA_ENV) */
                setobj(L, f->upvals[0]->v, gt);
                luaC_barrier(L, f->upvals[0], gt);

            } // == 1

            lua_pcall( L, 0, 0, 0);
        }

        lua_unlock(L);

        if( status != LUA_OK )
            break;
    }

    return status;
}

使用该函数，每个字符串/文件都将有自己的行号。 该函数实质上是从 lapi.c 中的 lua_load 复制而来，所以很容易在新版的 Lua 中做出调整。

2013-06-08 16:48:20

作者:

用户1863443

用户1863443
推荐文章