XS(XS_main_rnd64); /* prototype to pass -Wmissing-prototypes */
XS(XS_main_rnd64)
{
#ifdef dVAR
    dVAR; dXSARGS;
#else
    dXSARGS;
#endif
    if (items != 1)
       croak_xs_usage(cv,  "n");
    PERL_UNUSED_VAR(ax); /* -Wall */
    SP -= items;                 ### <<<<<<< Has no effect
    {
	int	n = (int)SvIV(ST(0));
#line 64 "monkeys.xs"
    I32* temp;
#line 135 "monkeys.c"
#line 66 "monkeys.xs"
    temp = PL_markstack_ptr++;
    rnd64(n);