--- a/R/jags.R
+++ b/R/jags.R
@@ -535,3 +535,8 @@
     }
     return(FALSE)
 }
+
+parallel.seeds <- function(factory, nchain)
+{
+    .Call("parallel_seeds", factory, nchain, PACKAGE="rjags")
+}