/* singleton */
static VALUE rb_gsl_qrng_memcpy(VALUE obj, VALUE dest, VALUE src)
{
gsl_qrng *q = NULL, *q2 = NULL;
Data_Get_Struct(dest, gsl_qrng, q);
Data_Get_Struct(src, gsl_qrng, q2);
gsl_qrng_memcpy(q, q2);
return dest;
}
CAMLprim value ml_gsl_qrng_memcpy(value src, value dst)
{
gsl_qrng_memcpy(Qrng_val(dst), Qrng_val(src));
return Val_unit;
}
