You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
23 lines
515 B
23 lines
515 B
#include "jiffy.h"
|
|
|
|
ERL_NIF_TERM
|
|
make_atom(ErlNifEnv* env, const char* name)
|
|
{
|
|
ERL_NIF_TERM ret;
|
|
if(enif_make_existing_atom(env, name, &ret, ERL_NIF_LATIN1)) {
|
|
return ret;
|
|
}
|
|
return enif_make_atom(env, name);
|
|
}
|
|
|
|
ERL_NIF_TERM
|
|
make_ok(jiffy_st* st, ErlNifEnv* env, ERL_NIF_TERM value)
|
|
{
|
|
return enif_make_tuple2(env, st->atom_ok, value);
|
|
}
|
|
|
|
ERL_NIF_TERM
|
|
make_error(jiffy_st* st, ErlNifEnv* env, const char* error)
|
|
{
|
|
return enif_make_tuple2(env, st->atom_error, make_atom(env, error));
|
|
}
|