diff --git a/src/c/num_rand.d b/src/c/num_rand.d index c62f263b0..bcb5e21a7 100644 --- a/src/c/num_rand.d +++ b/src/c/num_rand.d @@ -179,7 +179,7 @@ ecl_make_random_state(cl_object rs) if (type_of(rs) != t_random) { FEwrong_type_argument(@'random-state', rs); } - z->random.value = rs->random.value; + z->random.value = cl_copy_seq(rs->random.value); } return(z); }