Loading to_poly_solve has side-effect ?

--===============1292544791263070387==
Content-Type: multipart/alternative; boundary="000000000000960bb6065793279e"

--000000000000960bb6065793279e
Content-Type: text/plain; charset="UTF-8"

Hello all,

I'm defining a function %orb, and that works fine:
Maxima branch_5_49_base_597_g673c43be8_dirty https://maxima.sourceforge.io
using Lisp SBCL 2.6.0
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
The function bug_report() provides bug reporting information.
(%i1) %orb(a,b):=(a+b);
(%o1)                         %orb(a, b) := a + b
(%i2) %orb(23,19);
(%o2)                                 42

So far everything ok. Now, I need to_poly_solve, so I load it.
(%i3) load(to_poly_solve);
(%o3)
/home/serge/local/share/maxima/branch_5_49_base_597_g673c43be8_dirty/sha\
re/to_poly_solve/to_poly_solve.mac
(%i4) %orb(23,19);
(%o4)                                 42

Everything ok.
I forget I loaded to_poly_solve, so I load it again (could happen, right ?
:))
(%i5) load(to_poly_solve);
(%o5)
/home/serge/local/share/maxima/branch_5_49_base_597_g673c43be8_dirty/sha\
re/to_poly_solve/to_poly_solve.mac
(%i6) %orb(23,19);
incorrect syntax: %or is not a prefix operator
%orb
  ^
I didn't investigate further than finding a "small" reproducing case (if
loading to_poly_solve can be considered small, of course).
To make sure it isn't something specific to my setup (maxima version, lisp
version, local startup files), I just tried this on
https://maxima-on-wasm.pages.dev/ (great project!) and it gives exactly the
same error.
Any ideas ?

serge

--000000000000960bb6065793279e
Content-Type: text/html; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable

<div dir=3D"ltr"><div>Hello all,</div><div><br></div><div>I&#39;m defining =
a function %orb, and that works fine:</div><div><span style=3D"font-family:=
monospace">Maxima branch_5_49_base_597_g673c43be8_dirty <a href=3D"https://=
maxima.sourceforge.io">https://maxima.sourceforge.io</a><br>using Lisp SBCL=
 2.6.0<br>Distributed under the GNU Public License. See the file COPYING.<b=
r>Dedicated to the memory of William Schelter.<br>The function bug_report()=
 provides bug reporting information.<br>(%i1) %orb(a,b):=3D(a+b);<br>(%o1) =
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=
=A0 =C2=A0 %orb(a, b) :=3D a + b<br>(%i2) %orb(23,19);<br>(%o2) =C2=A0 =C2=
=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =
=C2=A0 =C2=A0 =C2=A0 =C2=A0 42</span></div><div><span style=3D"font-family:=
monospace"><br></span></div><div><span style=3D"font-family:arial,sans-seri=
f">So far everything ok. Now, I need to_poly_solve, so I load it.</span><sp=
an style=3D"font-family:monospace"><br>(%i3) load(to_poly_solve);<br>(%o3) =
/home/serge/local/share/maxima/branch_5_49_base_597_g673c43be8_dirty/sha\<b=
r>re/to_poly_solve/to_poly_solve.mac<br>(%i4) %orb(23,19);<br>(%o4) =C2=A0 =
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=
=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 42<br></span></div><div><br></div><div>Ever=
ything ok.</div><div>I forget I loaded to_poly_solve, so I load it again (c=
ould happen, right ? :))</div><div><span style=3D"font-family:monospace">(%=
i5) load(to_poly_solve);<br>(%o5) /home/serge/local/share/maxima/branch_5_4=
9_base_597_g673c43be8_dirty/sha\<br>re/to_poly_solve/to_poly_solve.mac<br>(=
%i6) %orb(23,19);<br>incorrect syntax: %or is not a prefix operator<br>%orb=
<br>=C2=A0 ^</span></div><div><span style=3D"font-family:arial,sans-serif">=
I didn&#39;t investigate further than finding a &quot;small&quot; reproduci=
ng case (if loading to_poly_solve can be considered small, of course).</spa=
n></div><div><span style=3D"font-family:arial,sans-serif">To make sure it i=
sn&#39;t something specific to my setup (maxima version, lisp version, loca=
l startup files),=C2=A0I just tried this on <a href=3D"https://maxima-on-wa=
sm.pages.dev/">https://maxima-on-wasm.pages.dev/</a> (great project!) and i=
t gives exactly the same error.</span></div><div><span style=3D"font-family=
:arial,sans-serif">Any ideas ?</span></div><div><span style=3D"font-family:=
arial,sans-serif"><br></span></div><div>serge</div><div><span style=3D"font=
-family:monospace"><br></span></div><div><br></div><div><br></div></div>

--000000000000960bb6065793279e--


--===============1292544791263070387==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline


--===============1292544791263070387==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

_______________________________________________
Maxima-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/maxima-discuss

--===============1292544791263070387==--