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.
27 lines
680 B
27 lines
680 B
#include "nif_utils.h"
|
|
#include "epqueue_nif.h"
|
|
|
|
#include <string.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_binary(ErlNifEnv* env, const char* buff, size_t length)
|
|
{
|
|
ERL_NIF_TERM term;
|
|
unsigned char *destination_buffer = enif_make_new_binary(env, length, &term);
|
|
memcpy(destination_buffer, buff, length);
|
|
return term;
|
|
}
|
|
|
|
ERL_NIF_TERM make_error(ErlNifEnv* env, const char* error)
|
|
{
|
|
return enif_make_tuple2(env, ATOMS.atomError, make_binary(env, error, strlen(error)));
|
|
}
|