- fix=b;
- while (isdigit((int)*fix))
- fix++;
- *fix = 0; /* maybe there is some non digit data in the string */
- if(!isdigit((int)*a) || !isdigit((int)*b))
- return DNAN;
- if(a_neg+b_neg == 1) /* can not handle numbers with different signs yet */
- return DNAN;
- a1 = &a[strlen(a)-1];
- m = max(strlen(a),strlen(b));
- if (m > LAST_DS_LEN) return DNAN; /* result string too short */
+ fix = b;
+ while (isdigit((int) *fix))
+ fix++;
+ *fix = 0; /* maybe there is some non digit data in the string */
+ if (!isdigit((int) *a) || !isdigit((int) *b))
+ return DNAN;
+ if (a_neg + b_neg == 1) /* can not handle numbers with different signs yet */
+ return DNAN;
+ a1 = &a[strlen(a) - 1];
+ m = max(strlen(a), strlen(b));
+ if (m > LAST_DS_LEN)
+ return DNAN; /* result string too short */