summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAntoine ELIAS <antoine.elias@scilab-enterprises.com>2016-11-10 08:33:36 +0100
committerAntoine ELIAS <antoine.elias@scilab-enterprises.com>2016-11-10 08:33:36 +0100
commitd262726698a17e08bb50f5b72c4de16250600cf3 (patch)
tree54ab60ee774a50920f5f8bd24004eaf06700ca3e
parenta6141cd95ba3e0a377937cff09ae3e028b593133 (diff)
downloadscilab-d262726698a17e08bb50f5b72c4de16250600cf3.zip
scilab-d262726698a17e08bb50f5b72c4de16250600cf3.tar.gz
utf: differential equation 2
Change-Id: I3cd39fcf2ca8fdc345abdd5a25ec4da52e2e541d
-rw-r--r--scilab/modules/differential_equations/sci_gateway/cpp/sci_int2d.cpp6
-rw-r--r--scilab/modules/differential_equations/sci_gateway/cpp/sci_int3d.cpp6
-rw-r--r--scilab/modules/differential_equations/src/cpp/differentialequationfunctions.cpp40
3 files changed, 26 insertions, 26 deletions
diff --git a/scilab/modules/differential_equations/sci_gateway/cpp/sci_int2d.cpp b/scilab/modules/differential_equations/sci_gateway/cpp/sci_int2d.cpp
index c476eed..6d80c17 100644
--- a/scilab/modules/differential_equations/sci_gateway/cpp/sci_int2d.cpp
+++ b/scilab/modules/differential_equations/sci_gateway/cpp/sci_int2d.cpp
@@ -210,17 +210,17 @@ types::Function::ReturnValue sci_int2d(types::typed_list &in, int _iRetCount, ty
210 { 210 {
211 if (pDblParams->get(0) < 0.0e0) 211 if (pDblParams->get(0) < 0.0e0)
212 { 212 {
213 sciprint(_("%ls: Warning: Wrong value for the first element of argument #%d: The default value will be used.\n"), L"int2d", 4); 213 sciprint(_("%s: Warning: Wrong value for the first element of argument #%d: The default value will be used.\n"), "int2d", 4);
214 } 214 }
215 215
216 if (pDblParams->get(2) < 1) 216 if (pDblParams->get(2) < 1)
217 { 217 {
218 sciprint(_("%ls: Warning: Wrong value for the third element of argument #%d: The default value will be used.\n"), L"int2d", 4); 218 sciprint(_("%s: Warning: Wrong value for the third element of argument #%d: The default value will be used.\n"), "int2d", 4);
219 } 219 }
220 220
221 if (pDblParams->get(3) < 1) 221 if (pDblParams->get(3) < 1)
222 { 222 {
223 sciprint(_("%ls: Warning: Wrong value for the fourth element of argument #%d: The default value will be used.\n"), L"int2d", 4); 223 sciprint(_("%s: Warning: Wrong value for the fourth element of argument #%d: The default value will be used.\n"), "int2d", 4);
224 } 224 }
225 } 225 }
226 226
diff --git a/scilab/modules/differential_equations/sci_gateway/cpp/sci_int3d.cpp b/scilab/modules/differential_equations/sci_gateway/cpp/sci_int3d.cpp
index 2fc3e9f..56714ef 100644
--- a/scilab/modules/differential_equations/sci_gateway/cpp/sci_int3d.cpp
+++ b/scilab/modules/differential_equations/sci_gateway/cpp/sci_int3d.cpp
@@ -257,7 +257,7 @@ types::Function::ReturnValue sci_int3d(types::typed_list &in, int _iRetCount, ty
257 { 257 {
258 if (pDblParams->get(i) < 0) 258 if (pDblParams->get(i) < 0)
259 { 259 {
260 sciprint(_("%ls: Warning: Wrong value for the element %d of argument #%d: The default value will be used.\n"), L"int3d", i + 1, 6); 260 sciprint(_("%s: Warning: Wrong value for the element %d of argument #%d: The default value will be used.\n"), "int3d", i + 1, 6);
261 } 261 }
262 } 262 }
263 } 263 }
@@ -271,7 +271,7 @@ types::Function::ReturnValue sci_int3d(types::typed_list &in, int _iRetCount, ty
271 { 271 {
272 if (getWarningMode()) 272 if (getWarningMode())
273 { 273 {
274 sciprint(_("%ls: Warning: Wrong value for the element %d and %d of argument #%d: The default value will be used.\n"), L"int3d", 3, 4, 6); 274 sciprint(_("%s: Warning: Wrong value for the element %d and %d of argument #%d: The default value will be used.\n"), "int3d", 3, 4, 6);
275 } 275 }
276 epsabs = 0.0; 276 epsabs = 0.0;
277 epsrel = 1.0e-5; 277 epsrel = 1.0e-5;
@@ -343,7 +343,7 @@ types::Function::ReturnValue sci_int3d(types::typed_list &in, int _iRetCount, ty
343 { 343 {
344 if (getWarningMode()) 344 if (getWarningMode())
345 { 345 {
346 sciprint(_("%ls: Warning: maxpts was too small to obtain the required accuracy.\n"), L"int3d"); 346 sciprint(_("%s: Warning: maxpts was too small to obtain the required accuracy.\n"), "int3d");
347 } 347 }
348 } 348 }
349 else if (ifail == 3) 349 else if (ifail == 3)
diff --git a/scilab/modules/differential_equations/src/cpp/differentialequationfunctions.cpp b/scilab/modules/differential_equations/src/cpp/differentialequationfunctions.cpp
index 5116a96..24874e4 100644
--- a/scilab/modules/differential_equations/src/cpp/differentialequationfunctions.cpp
+++ b/scilab/modules/differential_equations/src/cpp/differentialequationfunctions.cpp
@@ -216,7 +216,7 @@ void DifferentialEquationFunctions::execDasrtG(int* ny, double* t, double* y, in
216 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGFunctionDyn->get(0)); 216 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGFunctionDyn->get(0));
217 if (func == NULL) 217 if (func == NULL)
218 { 218 {
219 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringGFunctionDyn->get(0)); 219 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringGFunctionDyn->get(0));
220 throw ast::InternalError(errorMsg); 220 throw ast::InternalError(errorMsg);
221 } 221 }
222 ((dasrt_g_t)(func->functionPtr))(ny, t, y, ng, gout, rpar, ipar); 222 ((dasrt_g_t)(func->functionPtr))(ny, t, y, ng, gout, rpar, ipar);
@@ -244,7 +244,7 @@ void DifferentialEquationFunctions::execDasslF(double* t, double* y, double* ydo
244 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0)); 244 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0));
245 if (func == NULL) 245 if (func == NULL)
246 { 246 {
247 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringFFunctionDyn->get(0)); 247 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringFFunctionDyn->get(0));
248 throw ast::InternalError(errorMsg); 248 throw ast::InternalError(errorMsg);
249 } 249 }
250 ((dassl_f_t)(func->functionPtr))(t, y, ydot, delta, ires, rpar, ipar); 250 ((dassl_f_t)(func->functionPtr))(t, y, ydot, delta, ires, rpar, ipar);
@@ -272,7 +272,7 @@ void DifferentialEquationFunctions::execDasslJac(double* t, double* y, double* y
272 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringJacFunctionDyn->get(0)); 272 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringJacFunctionDyn->get(0));
273 if (func == NULL) 273 if (func == NULL)
274 { 274 {
275 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringJacFunctionDyn->get(0)); 275 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringJacFunctionDyn->get(0));
276 throw ast::InternalError(errorMsg); 276 throw ast::InternalError(errorMsg);
277 } 277 }
278 ((dassl_jac_t)(func->functionPtr))(t, y, ydot, pd, cj, rpar, ipar); 278 ((dassl_jac_t)(func->functionPtr))(t, y, ydot, pd, cj, rpar, ipar);
@@ -303,7 +303,7 @@ void DifferentialEquationFunctions::execDaskrPjac(double* res, int* ires, int* n
303 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringPjacFunctionDyn->get(0)); 303 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringPjacFunctionDyn->get(0));
304 if (func == NULL) 304 if (func == NULL)
305 { 305 {
306 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringPjacFunctionDyn->get(0)); 306 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringPjacFunctionDyn->get(0));
307 throw ast::InternalError(errorMsg); 307 throw ast::InternalError(errorMsg);
308 } 308 }
309 ((daskr_pjac_t)(func->functionPtr))(res, ires, neq, t, y, ydot, rewt, savr, 309 ((daskr_pjac_t)(func->functionPtr))(res, ires, neq, t, y, ydot, rewt, savr,
@@ -336,7 +336,7 @@ void DifferentialEquationFunctions::execDaskrPsol(int* neq, double* t, double* y
336 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringPsolFunctionDyn->get(0)); 336 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringPsolFunctionDyn->get(0));
337 if (func == NULL) 337 if (func == NULL)
338 { 338 {
339 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringPsolFunctionDyn->get(0)); 339 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringPsolFunctionDyn->get(0));
340 throw ast::InternalError(errorMsg); 340 throw ast::InternalError(errorMsg);
341 } 341 }
342 ((daskr_psol_t)(func->functionPtr))(neq, t, y, ydot, savr, wk, cj, wght, 342 ((daskr_psol_t)(func->functionPtr))(neq, t, y, ydot, savr, wk, cj, wght,
@@ -366,7 +366,7 @@ void DifferentialEquationFunctions::execImplF(int* neq, double* t, double* y, do
366 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0)); 366 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0));
367 if (func == NULL) 367 if (func == NULL)
368 { 368 {
369 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringFFunctionDyn->get(0)); 369 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringFFunctionDyn->get(0));
370 throw ast::InternalError(errorMsg); 370 throw ast::InternalError(errorMsg);
371 } 371 }
372 ((impl_f_t)(func->functionPtr))(neq, t, y, s, r, ires); 372 ((impl_f_t)(func->functionPtr))(neq, t, y, s, r, ires);
@@ -394,7 +394,7 @@ void DifferentialEquationFunctions::execImplG(int* neq, double* t, double* y, do
394 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGFunctionDyn->get(0)); 394 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGFunctionDyn->get(0));
395 if (func == NULL) 395 if (func == NULL)
396 { 396 {
397 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringGFunctionDyn->get(0)); 397 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringGFunctionDyn->get(0));
398 throw ast::InternalError(errorMsg); 398 throw ast::InternalError(errorMsg);
399 } 399 }
400 ((impl_g_t)(func->functionPtr))(neq, t, y, ml, mu, p, nrowp); 400 ((impl_g_t)(func->functionPtr))(neq, t, y, ml, mu, p, nrowp);
@@ -422,7 +422,7 @@ void DifferentialEquationFunctions::execImplJac(int* neq, double* t, double* y,
422 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringJacFunctionDyn->get(0)); 422 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringJacFunctionDyn->get(0));
423 if (func == NULL) 423 if (func == NULL)
424 { 424 {
425 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringJacFunctionDyn->get(0)); 425 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringJacFunctionDyn->get(0));
426 throw ast::InternalError(errorMsg); 426 throw ast::InternalError(errorMsg);
427 } 427 }
428 ((impl_jac_t)(func->functionPtr))(neq, t, y, s, ml, mu, p, nrowp); 428 ((impl_jac_t)(func->functionPtr))(neq, t, y, s, ml, mu, p, nrowp);
@@ -450,7 +450,7 @@ void DifferentialEquationFunctions::execBvodeGuess(double *x, double *z, double
450 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGuessFunctionDyn->get(0)); 450 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGuessFunctionDyn->get(0));
451 if (func == NULL) 451 if (func == NULL)
452 { 452 {
453 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringGuessFunctionDyn->get(0)); 453 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringGuessFunctionDyn->get(0));
454 throw ast::InternalError(errorMsg); 454 throw ast::InternalError(errorMsg);
455 } 455 }
456 ((bvode_ddd_t)(func->functionPtr))(x, z, d); 456 ((bvode_ddd_t)(func->functionPtr))(x, z, d);
@@ -478,7 +478,7 @@ void DifferentialEquationFunctions::execBvodeDfsub(double *x, double *z, double
478 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringDfsubFunctionDyn->get(0)); 478 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringDfsubFunctionDyn->get(0));
479 if (func == NULL) 479 if (func == NULL)
480 { 480 {
481 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringDfsubFunctionDyn->get(0)); 481 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringDfsubFunctionDyn->get(0));
482 throw ast::InternalError(errorMsg); 482 throw ast::InternalError(errorMsg);
483 } 483 }
484 ((bvode_ddd_t)(func->functionPtr))(x, z, d); 484 ((bvode_ddd_t)(func->functionPtr))(x, z, d);
@@ -506,7 +506,7 @@ void DifferentialEquationFunctions::execBvodeFsub(double *x, double *z, double *
506 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFsubFunctionDyn->get(0)); 506 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFsubFunctionDyn->get(0));
507 if (func == NULL) 507 if (func == NULL)
508 { 508 {
509 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringFsubFunctionDyn->get(0)); 509 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringFsubFunctionDyn->get(0));
510 throw ast::InternalError(errorMsg); 510 throw ast::InternalError(errorMsg);
511 } 511 }
512 ((bvode_ddd_t)(func->functionPtr))(x, z, d); 512 ((bvode_ddd_t)(func->functionPtr))(x, z, d);
@@ -534,7 +534,7 @@ void DifferentialEquationFunctions::execBvodeDgsub(int *i, double *z, double *g)
534 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringDgsubFunctionDyn->get(0)); 534 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringDgsubFunctionDyn->get(0));
535 if (func == NULL) 535 if (func == NULL)
536 { 536 {
537 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringDgsubFunctionDyn->get(0)); 537 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringDgsubFunctionDyn->get(0));
538 throw ast::InternalError(errorMsg); 538 throw ast::InternalError(errorMsg);
539 } 539 }
540 ((bvode_idd_t)(func->functionPtr))(i, z, g); 540 ((bvode_idd_t)(func->functionPtr))(i, z, g);
@@ -562,7 +562,7 @@ void DifferentialEquationFunctions::execBvodeGsub(int *i, double *z, double *g)
562 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGsubFunctionDyn->get(0)); 562 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGsubFunctionDyn->get(0));
563 if (func == NULL) 563 if (func == NULL)
564 { 564 {
565 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringGsubFunctionDyn->get(0)); 565 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringGsubFunctionDyn->get(0));
566 throw ast::InternalError(errorMsg); 566 throw ast::InternalError(errorMsg);
567 } 567 }
568 ((bvode_idd_t)(func->functionPtr))(i, z, g); 568 ((bvode_idd_t)(func->functionPtr))(i, z, g);
@@ -590,7 +590,7 @@ void DifferentialEquationFunctions::execFevalF(int *nn, double *x1, double *x2,
590 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0)); 590 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0));
591 if (func == NULL) 591 if (func == NULL)
592 { 592 {
593 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringFFunctionDyn->get(0)); 593 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringFFunctionDyn->get(0));
594 throw ast::InternalError(errorMsg); 594 throw ast::InternalError(errorMsg);
595 } 595 }
596 596
@@ -619,7 +619,7 @@ void DifferentialEquationFunctions::execInt3dF(double* x, int* numfun, double* f
619 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0)); 619 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0));
620 if (func == NULL) 620 if (func == NULL)
621 { 621 {
622 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringFFunctionDyn->get(0)); 622 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringFFunctionDyn->get(0));
623 throw ast::InternalError(errorMsg); 623 throw ast::InternalError(errorMsg);
624 } 624 }
625 ((int3d_f_t)(func->functionPtr))(x, numfun, funvls); 625 ((int3d_f_t)(func->functionPtr))(x, numfun, funvls);
@@ -647,7 +647,7 @@ double DifferentialEquationFunctions::execInt2dF(double* x, double* y)
647 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0)); 647 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0));
648 if (func == NULL) 648 if (func == NULL)
649 { 649 {
650 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringFFunctionDyn->get(0)); 650 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringFFunctionDyn->get(0));
651 throw ast::InternalError(errorMsg); 651 throw ast::InternalError(errorMsg);
652 } 652 }
653 return ((int2d_f_t)(func->functionPtr))(x, y); 653 return ((int2d_f_t)(func->functionPtr))(x, y);
@@ -675,7 +675,7 @@ double DifferentialEquationFunctions::execIntgF(double* x)
675 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0)); 675 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0));
676 if (func == NULL) 676 if (func == NULL)
677 { 677 {
678 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringFFunctionDyn->get(0)); 678 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringFFunctionDyn->get(0));
679 throw ast::InternalError(errorMsg); 679 throw ast::InternalError(errorMsg);
680 } 680 }
681 return ((intg_f_t)(func->functionPtr))(x); 681 return ((intg_f_t)(func->functionPtr))(x);
@@ -703,7 +703,7 @@ void DifferentialEquationFunctions::execOdeF(int* n, double* t, double* y, doubl
703 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0)); 703 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringFFunctionDyn->get(0));
704 if (func == NULL) 704 if (func == NULL)
705 { 705 {
706 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringFFunctionDyn->get(0)); 706 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringFFunctionDyn->get(0));
707 throw ast::InternalError(errorMsg); 707 throw ast::InternalError(errorMsg);
708 } 708 }
709 709
@@ -746,7 +746,7 @@ void DifferentialEquationFunctions::execFunctionJac(int *n, double *t, double *y
746 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringJacFunctionDyn->get(0)); 746 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringJacFunctionDyn->get(0));
747 if (func == NULL) 747 if (func == NULL)
748 { 748 {
749 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringJacFunctionDyn->get(0)); 749 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringJacFunctionDyn->get(0));
750 throw ast::InternalError(errorMsg); 750 throw ast::InternalError(errorMsg);
751 } 751 }
752 ((func_jac_t)(func->functionPtr))(n, t, y, ml, mu, J, nrpd); 752 ((func_jac_t)(func->functionPtr))(n, t, y, ml, mu, J, nrpd);
@@ -774,7 +774,7 @@ void DifferentialEquationFunctions::execFunctionG(int* n, double* t, double* y,
774 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGFunctionDyn->get(0)); 774 ConfigVariable::EntryPointStr* func = ConfigVariable::getEntryPoint(m_pStringGFunctionDyn->get(0));
775 if (func == NULL) 775 if (func == NULL)
776 { 776 {
777 sprintf(errorMsg, _("Undefined function '%ls'.\n"), m_pStringGFunctionDyn->get(0)); 777 sprintf(errorMsg, _("Undefined function '%s'.\n"), m_pStringGFunctionDyn->get(0));
778 throw ast::InternalError(errorMsg); 778 throw ast::InternalError(errorMsg);
779 } 779 }
780 ((func_g_t)(func->functionPtr))(n, t, y, ng, gout); 780 ((func_g_t)(func->functionPtr))(n, t, y, ng, gout);