diff --git a/rstan/rstan/R/get_rng.R b/rstan/rstan/R/get_rng.R index 2aa09bb1b..113475bbc 100644 --- a/rstan/rstan/R/get_rng.R +++ b/rstan/rstan/R/get_rng.R @@ -3,8 +3,5 @@ get_rng <- function(seed=0L) { if (length(seed) != 1) stop("Seed must be a length-1 integer vector.") } - return(.Call('get_rng_', seed)) + return(.Call(get_rng_, seed)) } - - - diff --git a/rstan/rstan/R/get_stream.R b/rstan/rstan/R/get_stream.R index 9a98cbd46..c1dfb04dc 100644 --- a/rstan/rstan/R/get_stream.R +++ b/rstan/rstan/R/get_stream.R @@ -1,5 +1,5 @@ get_stream <- function() { - return(.Call('get_stream_')) + return(.Call(get_stream_)) }