comparison src/paranormal/libcalc/function.c @ 1176:44d28af95a23 trunk

[svn] - i forgot to commit something here

1175:7ae024f5d91b

  int x = (int)pop (stack);
  return (y == 0) ? 0 : (x / y);
}

static double f_rand (ex_stack *stack) {
  return rand() % pop (stack);
}

/* */

static const func_t init[] = {

  { "asin", f_asin },
  { "acos", f_acos },
  { "atan", f_atan },
  { "log", f_log },
  { "if", f_if },
  { "div", f_div }
  { "rand", f_rand }
};

int function_lookup (const char *name) {
  int i;

1176:44d28af95a23

  int x = (int)pop (stack);
  return (y == 0) ? 0 : (x / y);
}

static double f_rand (ex_stack *stack) {
  return rand() % (int) pop(stack);
}

/* */

static const func_t init[] = {

  { "asin", f_asin },
  { "acos", f_acos },
  { "atan", f_atan },
  { "log", f_log },
  { "if", f_if },
  { "div", f_div },
  { "rand", f_rand }
};

int function_lookup (const char *name) {
  int i;