S_INT 456 ext/bigdecimal/bigdecimal.c S_INT d; S_INT 472 ext/bigdecimal/bigdecimal.c static S_INT S_INT 475 ext/bigdecimal/bigdecimal.c S_INT n; S_INT 776 ext/bigdecimal/bigdecimal.c S_INT e; S_INT 1267 ext/bigdecimal/bigdecimal.c VpChangeSign(c,(S_INT)1); S_INT 1283 ext/bigdecimal/bigdecimal.c S_INT mx, n; S_INT 1565 ext/bigdecimal/bigdecimal.c S_INT mc = 0; S_INT 1877 ext/bigdecimal/bigdecimal.c rb_define_const(rb_cBigDecimal, "BASE", INT2FIX((S_INT)VpBaseVal())); S_INT 2073 ext/bigdecimal/bigdecimal.c static int AddExponent(Real *a,S_INT n); S_INT 2078 ext/bigdecimal/bigdecimal.c static void VpFormatSt(char *psz,S_INT fFmt); S_INT 2408 ext/bigdecimal/bigdecimal.c S_INT ex; S_INT 2422 ext/bigdecimal/bigdecimal.c if(ex > (S_INT)vp->Prec) { S_INT 2423 ext/bigdecimal/bigdecimal.c nc += BASE_FIG*(ex - (S_INT)vp->Prec); S_INT 2508 ext/bigdecimal/bigdecimal.c AddExponent(Real *a,S_INT n) S_INT 2510 ext/bigdecimal/bigdecimal.c S_INT e = a->exponent; S_INT 2511 ext/bigdecimal/bigdecimal.c S_INT m = e+n; S_INT 2512 ext/bigdecimal/bigdecimal.c S_INT eb,mb; S_INT 2745 ext/bigdecimal/bigdecimal.c S_INT sw, isw; S_INT 2840 ext/bigdecimal/bigdecimal.c VpSetSign(c,(S_INT)1); S_INT 2844 ext/bigdecimal/bigdecimal.c VpSetSign(c,(S_INT)1); S_INT 3524 ext/bigdecimal/bigdecimal.c if(!AddExponent(a,-((S_INT)i))) return 0; S_INT 3737 ext/bigdecimal/bigdecimal.c VpFormatSt(char *psz,S_INT fFmt) S_INT 3741 ext/bigdecimal/bigdecimal.c S_INT nf = 0; S_INT 3975 ext/bigdecimal/bigdecimal.c S_INT e,es, eb, ef; S_INT 3976 ext/bigdecimal/bigdecimal.c S_INT sign, signe; S_INT 3995 ext/bigdecimal/bigdecimal.c es = e*((S_INT)BASE_FIG); S_INT 3997 ext/bigdecimal/bigdecimal.c if(es>e*((S_INT)BASE_FIG)) { S_INT 4035 ext/bigdecimal/bigdecimal.c ef = eb / ((S_INT)BASE_FIG); S_INT 4036 ext/bigdecimal/bigdecimal.c ef = eb - ef * ((S_INT)BASE_FIG); S_INT 4043 ext/bigdecimal/bigdecimal.c eb = e / ((S_INT)BASE_FIG); S_INT 4153 ext/bigdecimal/bigdecimal.c div /=(double)((S_INT)BASE); S_INT 4154 ext/bigdecimal/bigdecimal.c *d = *d +((double) ((S_INT)m->frac[ind_m++])) * div; S_INT 4156 ext/bigdecimal/bigdecimal.c *e = m->exponent * ((S_INT)BASE_FIG); S_INT 4198 ext/bigdecimal/bigdecimal.c val /=(double)((S_INT)BASE); S_INT 4202 ext/bigdecimal/bigdecimal.c val2 = 1.0 /(double)((S_INT)BASE); S_INT 4204 ext/bigdecimal/bigdecimal.c val *=(double)((S_INT)BASE); S_INT 4213 ext/bigdecimal/bigdecimal.c val *=(double)((S_INT)BASE); S_INT 4215 ext/bigdecimal/bigdecimal.c val -=(double)((S_INT)i); S_INT 4220 ext/bigdecimal/bigdecimal.c VpSetSign(m, (S_INT)1); S_INT 4222 ext/bigdecimal/bigdecimal.c VpSetSign(m,-(S_INT)1); S_INT 4228 ext/bigdecimal/bigdecimal.c (U_LONG)(val*((double)((S_INT)BASE)))); S_INT 4245 ext/bigdecimal/bigdecimal.c VpItoV(Real *m, S_INT ival) S_INT 4250 ext/bigdecimal/bigdecimal.c S_INT ne; S_INT 4359 ext/bigdecimal/bigdecimal.c val /=(double)((S_INT)BASE); S_INT 4391 ext/bigdecimal/bigdecimal.c VpChangeSign(y,(S_INT)1); S_INT 4499 ext/bigdecimal/bigdecimal.c S_INT s = VpGetSign(y); S_INT 4669 ext/bigdecimal/bigdecimal.c VpPower(Real *y, Real *x, S_INT n) S_INT 4714 ext/bigdecimal/bigdecimal.c VpSetSign(y,-(S_INT)1); S_INT 84 ext/bigdecimal/bigdecimal.h S_INT exponent;/* Exponent part. */ S_INT 152 ext/bigdecimal/bigdecimal.h VP_EXPORT void VpItoV(Real *m,S_INT ival); S_INT 159 ext/bigdecimal/bigdecimal.h VP_EXPORT int VpPower(Real *y,Real *x,S_INT n);