forked from enlightenment/efl
40 lines
778 B
C
40 lines
778 B
C
#ifdef HAVE_CONFIG_H
|
|
# include "config.h"
|
|
#endif
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <Eina.h>
|
|
|
|
#include "Embryo.h"
|
|
#include "embryo_private.h"
|
|
|
|
/* exported random number api */
|
|
|
|
static Embryo_Cell
|
|
_embryo_rand_rand(Embryo_Program *ep EINA_UNUSED, Embryo_Cell *params EINA_UNUSED)
|
|
{
|
|
return (Embryo_Cell)(rand() & 0xffff);
|
|
}
|
|
|
|
static Embryo_Cell
|
|
_embryo_rand_randf(Embryo_Program *ep EINA_UNUSED, Embryo_Cell *params EINA_UNUSED)
|
|
{
|
|
double r;
|
|
float f;
|
|
|
|
r = (double)(rand() & 0xffff) / 65535.0;
|
|
f = (float)r;
|
|
return EMBRYO_FLOAT_TO_CELL(f);
|
|
}
|
|
|
|
/* functions used by the rest of embryo */
|
|
|
|
void
|
|
_embryo_rand_init(Embryo_Program *ep)
|
|
{
|
|
embryo_program_native_call_add(ep, "rand", _embryo_rand_rand);
|
|
embryo_program_native_call_add(ep, "randf", _embryo_rand_randf);
|
|
}
|
|
|