Miroirs/newrpl
1
0
Fork 0
mirror of https://git.code.sf.net/p/newrpl/sources synced 2024-11-16 19:51:25 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fixed 0-N bug in Complex numbers

Browse source
This commit is contained in:
claudiol 2021-08-23 18:25:27 -04:00
parent 3f4281e5b8
commit 2a7a969c6d
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
newrpl/lib-30-complex.c
View file

@ -637,13 +637,13 @@ void LIB_HANDLER()
switch (cclass1) {
case CPLX_ZERO:
{
if(OPCODE(CurOpcode) == OVR_SUB) {
/*if(OPCODE(CurOpcode) == OVR_SUB) {
if(!iszeroReal(&Rarg2))
Rarg2.flags ^= F_NEGATIVE;
if(amode2 == ANGLENONE)
if(!iszeroReal(&Iarg2))
Iarg2.flags ^= F_NEGATIVE;
}
}*/
rplNewComplexPush(&Rarg2, &Iarg2, amode2);
if(Exceptions)
return;