diff --git a/src/rtwrap.c b/src/rtwrap.c index b7a4f893..e14738bf 100644 --- a/src/rtwrap.c +++ b/src/rtwrap.c @@ -96,7 +96,7 @@ B wfn_c1(B t, B x) { #endif dec(exp); #else - B r = fi(f, inc(x)); + B r = fi(f, x); #endif return r; }