瀏覽代碼

Adapt basicnif template to OTP changes

pull/3/head
Tuncer Ayaz 13 年之前
父節點
當前提交
112f74cac1
共有 2 個檔案被更改,包括 21 行新增15 行删除
  1. +20
    -14
      priv/templates/basicnif.c
  2. +1
    -1
      priv/templates/basicnif.erl

+ 20
- 14
priv/templates/basicnif.c 查看文件

@ -1,4 +1,3 @@
#include "erl_nif.h"
static ErlNifResourceType* {{module}}_RESOURCE;
@ -8,8 +7,10 @@ typedef struct
} {{module}}_handle;
// Prototypes
ERL_NIF_TERM {{module}}_new(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[]);
ERL_NIF_TERM {{module}}_myfunction(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[]);
static ERL_NIF_TERM {{module}}_new(ErlNifEnv* env, int argc,
const ERL_NIF_TERM argv[]);
static ERL_NIF_TERM {{module}}_myfunction(ErlNifEnv* env, int argc,
const ERL_NIF_TERM argv[]);
static ErlNifFunc nif_funcs[] =
{
@ -17,34 +18,39 @@ static ErlNifFunc nif_funcs[] =
{"myfunction", 1, {{module}}_myfunction}
};
ERL_NIF_TERM {{module}}_new(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[])
static ERL_NIF_TERM {{module}}_new(ErlNifEnv* env, int argc,
const ERL_NIF_TERM argv[])
{
{{module}}_handle* handle = enif_alloc_resource(env,
{{module}}_RESOURCE,
{{module}}_handle* handle = enif_alloc_resource({{module}}_RESOURCE,
sizeof({{module}}_handle));
ERL_NIF_TERM result = enif_make_resource(env, handle);
enif_release_resource(env, handle);
enif_release_resource(handle);
return enif_make_tuple2(env, enif_make_atom(env, "ok"), result);
}
ERL_NIF_TERM {{module}}_myfunction(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[])
static ERL_NIF_TERM {{module}}_myfunction(ErlNifEnv* env, int argc,
const ERL_NIF_TERM argv[])
{
return enif_make_atom(env, "ok");
}
static void {{module}}_resource_cleanup(ErlNifEnv* env, void* arg)
{
// Delete any dynamically allocated memory stored in {{module}}_handle
// {{module}}_handle* handle = ({{module}}_handle*)arg;
/* Delete any dynamically allocated memory stored in {{module}}_handle */
/* {{module}}_handle* handle = ({{module}}_handle*)arg; */
}
static int on_load(ErlNifEnv* env, void** priv_data, ERL_NIF_TERM load_info)
{
{{module}}_RESOURCE = enif_open_resource_type(env, "{{module}}_resource",
&{{module}}_resource_cleanup,
ERL_NIF_RT_CREATE | ERL_NIF_RT_TAKEOVER,
0);
ErlNifResourceFlags flags = ERL_NIF_RT_CREATE | ERL_NIF_RT_TAKEOVER;
ErlNifResourceType* rt = enif_open_resource_type(env, NULL,
"{{module}}_resource",
&{{module}}_resource_cleanup,
flags, NULL);
if (rt == NULL)
return -1;
return 0;
}

+ 1
- 1
priv/templates/basicnif.erl 查看文件

@ -27,7 +27,7 @@ init() ->
new() ->
?nif_stub.
myfunction(Ref) ->
myfunction(_Ref) ->
?nif_stub.
%% ===================================================================

Loading…
取消
儲存