In share package decfp, declare user-visible functions with DEFMFUN instead of DEFUN.
commit2154a8d0980df1a6f74a72e549fb801cb2db0601
authorRobert Dodier <robert_dodier@users.sourceforge.net>
Sat, 4 Mar 2023 18:43:33 +0000 (4 10:43 -0800)
committerRobert Dodier <robert_dodier@users.sourceforge.net>
Sat, 4 Mar 2023 18:43:33 +0000 (4 10:43 -0800)
tree35549b273028bfc0269df12b490cccfd1fb4b24f
parente252531776d984db9f596d0f808aa97ffa1606eb
In share package decfp, declare user-visible functions with DEFMFUN instead of DEFUN.

(DEFMFUN $FOO ...) defines two functions, one named $FOO and the other FOO-IMPL.
A subsequent (DEFUN $FOO ...) redefines only $FOO and leaves FOO-IMPL untouched.
decfp redefines $BFLOAT and the presence of the old BFLOAT-IMPL leads
to unexpected behavior.

Partial fix for SF bug #4110: "share package decfp inadvertent interaction with floor(sqrt(2))"
With this commit, floor(sqrt(2)) returns floor(sqrt(2)) which is still incorrect;
it returns 1 when decfp is not loaded.
share/numeric/decfp-core.lisp