"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "src/number.c" between
grpn-1.5.1.tar.gz and grpn-1.5.2.tar.gz

About: grpn is a RPN calcuator for real and complex numbers (requires GTK).

number.c  (grpn-1.5.1):number.c  (grpn-1.5.2)
skipping to change at line 206 skipping to change at line 206
break; break;
default: default:
fprintf(stderr, "Error: Unknown number type\n"); fprintf(stderr, "Error: Unknown number type\n");
exit(0); exit(0);
} }
if(c->data == NULL){ free(c); c = NULL; } if(c->data == NULL){ free(c); c = NULL; }
return c; return c;
} }
Number * lnNumber(Number *a){ Number * lnNumber(Number *a){
Real *r1;
Cmplx *c1; Cmplx *c1;
Number *c = newNumber(); Number *c = newNumber();
if(a == NULL){ fprintf(stderr, "lnNumber(NULL)\n"); exit(0); } if(a == NULL){ fprintf(stderr, "lnNumber(NULL)\n"); exit(0); }
switch(a->type){ switch(a->type){
case REAL: case REAL:
if(-1 == cmpReal(a->data, realZero)){ if(-1 == cmpReal(a->data, realZero)){
/* ln(<0) is complex ! */ /* ln(<0) is complex ! */
c1 = setCmplxReal(newCmplx(), a->data, realZero); c1 = setCmplxReal(newCmplx(), a->data, realZero);
skipping to change at line 243 skipping to change at line 242
break; break;
default: default:
fprintf(stderr, "Error: Unknown number type\n"); fprintf(stderr, "Error: Unknown number type\n");
exit(0); exit(0);
} }
if(c->data == NULL){ free(c); c = NULL; } if(c->data == NULL){ free(c); c = NULL; }
return c; return c;
} }
Number * logNumber(Number *a){ Number * logNumber(Number *a){
Real *r1;
Cmplx *c1; Cmplx *c1;
Number *c = newNumber(); Number *c = newNumber();
if(a == NULL){ fprintf(stderr, "logNumber(NULL)\n"); exit(0); } if(a == NULL){ fprintf(stderr, "logNumber(NULL)\n"); exit(0); }
switch(a->type){ switch(a->type){
case REAL: case REAL:
if(-1 == cmpReal(a->data, realZero)){ if(-1 == cmpReal(a->data, realZero)){
/* log(<0) is complex ! */ /* log(<0) is complex ! */
c1 = setCmplxReal(newCmplx(), a->data, realZero); c1 = setCmplxReal(newCmplx(), a->data, realZero);
 End of changes. 2 change blocks. 
2 lines changed or deleted 0 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)