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;