swig生成基于neko虚拟机的测试库

我们之前已经测试过neko的在c里的转换了。 接下来基于昨天的研究成果 我们来组合一下,把他们结合到一起试试。

neko测试模块

$exports.x = 33;
var inner  = function () {
        return 1;
}
$exports.f = function(x) { return x * 2 + 1 + inner(); }

examp.i 文件


%module example
/***
 * initVM(void)
 * @return userdata neko_vm *
 */
neko_vm * initVM (void) ;
/**
 * selectVM
 */
void selectVM(neko_vm * vm) ;
/***
 *  load a vm Module
 *  return  userdata ;
 *
 */
value loadModule(char * str);
/***
 * executeModule
 *
 */
void executeModule(value module);


example.c

/*
 * example.c
 */

/***
 * initVM(void)
 * @return neko_vm *
 */
neko_vm * initVM (void) {
	neko_vm *vm;
	value module;
	neko_global_init(NULL);
	vm = neko_vm_alloc(NULL);
	return vm;
}
/**
 * selectVM
 */
void selectVM(neko_vm * vm) {
	neko_vm_select(vm);
}

/***
 *  load a vm Module
 *  return userdata  ;
 */
value loadModule(char * str) {
	value module ;
	value loader;
	value ret;
	value exc = NULL;
	value args[2];

	loader = neko_default_loader(NULL,0);
        args[0] = alloc_string(str);
        args[1] = loader;
        ret = val_callEx(loader,
    		        val_field(loader,val_id("loadmodule")),
			args,2,&exc);

        if( exc != NULL ) {
            buffer b = alloc_buffer(NULL);
            val_buffer(b,exc);
            printf("Uncaught exception - %s\n",val_string(buffer_to_string(b)));
            return NULL;
        }
	return ret;
}

/***
 * executeModule
 *
 */
void executeModule(value module) {
    value x = val_field(module,val_id("x"));
    value f = val_field(module,val_id("f"));
    value ret;
    if( !val_is_int(x) )
         return;
    printf("x = %d\n",val_int(x));
    if( !val_is_function(f) || val_fun_nargs(f) != 1 )
         return;
    ret = val_call1(f,x);
    if( !val_is_int(ret) )
         return;
    printf("f(x) = %d\n",val_int(ret));
}


make生成example.so 文件

测试的lua代码

package.cpath = './?.so;'
print(package.loadlib);

install,b,c = package.loadlib("./example.so","luaopen_example");

print(install,b,c);

install();
print("vm test")

local vm = example.initVM();
print(vm);
example.selectVM(vm);

local module = example.loadModule("mymodule.n")
print(module);
example.executeModule(module);

输出

function: 0x254ecb0
function: 0x25541c0     nil     nil
vm test
userdata: 0x2556968
userdata: 0x2556a58
x = 33
f(x) = 68

这件事开始有点意思了。

转载于:https://my.oschina.net/littlemonkeyc/blog/1634711

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值