diff options
Diffstat (limited to 'src/interp/bc-solve.boot')
-rw-r--r-- | src/interp/bc-solve.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/bc-solve.boot b/src/interp/bc-solve.boot index ce1fce75..839fc8ca 100644 --- a/src/interp/bc-solve.boot +++ b/src/interp/bc-solve.boot @@ -207,7 +207,7 @@ bcMakeLinearEquations(i,number)== bcInputEquationsEnd htPage == - fun := htpProperty(htPage, 'exitFunction) => FUNCALL(fun,htPage) + fun := htpProperty(htPage, 'exitFunction) => apply(fun,[htPage]) systemError nil bcSolveEquationsNumerically(htPage,p) == |