C++ (Cpp) RngStream_ResetStartSubstreamの例

コード例 #1

ファイル: jmsg_rngstream.cpp プロジェクト: dindon-sournois/simgrid

JNIEXPORT void JNICALL Java_org_simgrid_msg_RngStream_resetStartSubstream(JNIEnv *env, jobject jrngstream) {
  RngStream rngstream = jrngstream_to_native(env, jrngstream);
  if (!rngstream)
    return;

  RngStream_ResetStartSubstream(rngstream);
}

コード例 #2

ファイル: R_RngStreams.c プロジェクト: cran/rstream

SEXP R_RngStreams_ResetStartSubstream (SEXP R_stream)
     /*----------------------------------------------------------------------*/
     /* Reset current substream (jump to begining of current substream).     */
     /*                                                                      */
     /* parameters:                                                          */
     /*   R_stream ... (pointer) ... pointer the Stream object               */
     /*----------------------------------------------------------------------*/
{
  RngStream stream;

  /* check pointer */
  CHECK_STREAM_PTR(R_stream);

  /* Extract pointer to generator */
  stream = R_ExternalPtrAddr(R_stream);
  CHECK_NULL(stream);

  /* reset */
  RngStream_ResetStartSubstream(stream);

  return R_NilValue;
} /* end of R_RngStreams_ResetStartSubstream() */