diff options
Diffstat (limited to 'Build/source/utils/asymptote/runarray.in')
-rw-r--r-- | Build/source/utils/asymptote/runarray.in | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Build/source/utils/asymptote/runarray.in b/Build/source/utils/asymptote/runarray.in index 4d0aaaa8d28..c9f80a12297 100644 --- a/Build/source/utils/asymptote/runarray.in +++ b/Build/source/utils/asymptote/runarray.in @@ -1599,10 +1599,12 @@ real simpson(callableReal *f, real a, real b, real acc=DBL_EPSILON, { real integral; if(dxmax <= 0) dxmax=fabs(b-a); + callable *oldFunc=Func; Func=f; FuncStack=Stack; if(!simpson(integral,wrapFunction,a,b,acc,dxmax)) error("nesting capacity exceeded in simpson"); + Func=oldFunc; return integral; } |