Skip to content
Prev Previous commit
Next Next commit
fix: this fixes two small bugs for the Evaluate-statement:
- removed spurious warning about missing numerical implementation for functions that do not evaluate numerically after the Evaluate statement,
- rational coefficients multiplied by symbols that remain unevaluated were incorrectly converted to floating-point coefficients.
  • Loading branch information
cbmarini committed Dec 9, 2025
commit 8ae55708092d126cfb30149b9f97ddfa244f7e41
8 changes: 2 additions & 6 deletions sources/evaluate.c
Original file line number Diff line number Diff line change
Expand Up @@ -392,9 +392,9 @@ int EvaluateFun(PHEAD WORD *term, WORD level, WORD *pars)
mpfr_pow_si(auxr3,auxr3,ti[1],RND);
mpfr_mul(auxr2,auxr2,auxr3,RND);
ti[1] = 0;
first = 0;
}
}
first = 0;
goto nextfun;
}
if ( tt != tnext && *t != AGMFUNCTION && *t != ATAN2FUNCTION) goto nextfun;
Expand Down Expand Up @@ -677,12 +677,8 @@ int EvaluateFun(PHEAD WORD *term, WORD level, WORD *pars)
case MZV:
case EULER:
case MZVHALF:
goto nextfun;
default:
MLOCK(ErrorMessageLock);
MesPrint("Function in evaluate statement not yet implemented.");
MUNLOCK(ErrorMessageLock);
break;
goto nextfun;
}
}
else goto nextfun;
Expand Down