Commit ea3f0639 authored by Radford Neal's avatar Radford Neal

small fix

parent 4fc78b22
......@@ -89,7 +89,7 @@ static SEXP do_random1(SEXP call, SEXP op, SEXP args, SEXP rho)
int opcode = PRIMVAL(op);
if (opcode < 0 || opcode >= sizeof rand1_funs / sizeof rand1_funs[0])
if (opcode < 0 || opcode >= sizeof rand1_table / sizeof rand1_table[0])
error(_("internal error in do_random1"));
double (*fncall)(double) = rand1_table[opcode].fncall;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment