7u83/stc_rpncalc
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

more checks for NaN/errors before performing operations

Browse Source
This commit is contained in:
Jeff Wang 2019-10-02 22:46:26 -04:00
parent 23e49a0405
commit 5a3dc2337d
1 changed files with 14 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
src/calc.c
View File

@ -84,8 +84,10 @@ void process_cmd(char cmd){
} break;
//////////
case '=':{
StackPtr--;
copy_decn(&stack(STACK_X), &stack(STACK_Y));
if (!decn_is_nan(&stack(STACK_X))){
StackPtr--;
copy_decn(&stack(STACK_X), &stack(STACK_Y));
}
} break;
//////////
case 'c':{
@ -93,14 +95,19 @@ void process_cmd(char cmd){
} break;
//////////
case '<':{ //use as +/-
negate_decn(&stack(STACK_X));
if (!decn_is_nan(&stack(STACK_X))){
negate_decn(&stack(STACK_X));
}
} break;
//////////
case 'r':{ //use as swap
dec80 tmp;
copy_decn(&tmp, &stack(STACK_X));
copy_decn(&stack(STACK_X), &stack(STACK_Y));
copy_decn(&stack(STACK_Y), &tmp);
if (!decn_is_nan(&stack(STACK_X))){
dec80 tmp;
copy_decn(&tmp, &stack(STACK_X));
copy_decn(&stack(STACK_X), &stack(STACK_Y));
copy_decn(&stack(STACK_Y), &tmp);
}
} break;
} break;
//////////
} //switch(cmd)