/*--------------------------------------------------------------------------*/ int sci_end_scicosim(char *fname, unsigned long fname_len) { /* termine la simulation */ int isrun = C2F(cosim).isrun; CheckRhs(-1, 0); if (!isrun) { Scierror(999, _("%s: scicosim is not running.\n"), fname); } else { end_scicos_sim(); PutLhsVar(); } return 0; }
types::Function::ReturnValue sci_end_scicosim(types::typed_list &in, int _iRetCount, types::typed_list &/*out*/) { if (in.size() != 0) { Scierror(77, _("%s: Wrong number of input argument(s): %d expected.\n"), funname.data(), 0); return types::Function::Error; } if (_iRetCount > 1) { Scierror(78, _("%s: Wrong number of output argument(s): %d expected.\n"), funname.data(), 1); return types::Function::Error; } const int isrun = C2F(cosim).isrun; if (!isrun) { Scierror(999, _("%s: scicosim is not running.\n"), funname.data()); return types::Function::Error; } end_scicos_sim(); return types::Function::OK; }