Lines Matching refs:bcd
461 /* a BCD string (uByte *bcdin) of length DECPMAX uBytes. */
486 #define GETCOEFF(df, bcd) { \
488 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
489 dpd2bcd8(bcd+1, sourhi>>10); \
490 dpd2bcd83(bcd+4, sourhi);}
491 #define GETWCOEFF(df, bcd) { \
494 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
495 dpd2bcd8(bcd+1, sourhi>>8); \
496 dpd2bcd8(bcd+4, (sourhi<<2) | (sourlo>>30)); \
497 dpd2bcd8(bcd+7, sourlo>>20); \
498 dpd2bcd8(bcd+10, sourlo>>10); \
499 dpd2bcd83(bcd+13, sourlo);}
502 #define GETCOEFF(df, bcd) { \
505 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
506 dpd2bcd8(bcd+1, sourhi>>8); \
507 dpd2bcd8(bcd+4, (sourhi<<2) | (sourlo>>30)); \
508 dpd2bcd8(bcd+7, sourlo>>20); \
509 dpd2bcd8(bcd+10, sourlo>>10); \
510 dpd2bcd83(bcd+13, sourlo);}
511 #define GETWCOEFF(df, bcd) { \
516 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
517 dpd2bcd8(bcd+1, sourhi>>4); \
518 dpd2bcd8(bcd+4, ((sourhi)<<6) | (sourmh>>26)); \
519 dpd2bcd8(bcd+7, sourmh>>16); \
520 dpd2bcd8(bcd+10, sourmh>>6); \
521 dpd2bcd8(bcd+13, ((sourmh)<<4) | (sourml>>28)); \
522 dpd2bcd8(bcd+16, sourml>>18); \
523 dpd2bcd8(bcd+19, sourml>>8); \
524 dpd2bcd8(bcd+22, ((sourml)<<2) | (sourlo>>30)); \
525 dpd2bcd8(bcd+25, sourlo>>20); \
526 dpd2bcd8(bcd+28, sourlo>>10); \
527 dpd2bcd83(bcd+31, sourlo);}
530 #define GETCOEFF(df, bcd) { \
535 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
536 dpd2bcd8(bcd+1, sourhi>>4); \
537 dpd2bcd8(bcd+4, ((sourhi)<<6) | (sourmh>>26)); \
538 dpd2bcd8(bcd+7, sourmh>>16); \
539 dpd2bcd8(bcd+10, sourmh>>6); \
540 dpd2bcd8(bcd+13, ((sourmh)<<4) | (sourml>>28)); \
541 dpd2bcd8(bcd+16, sourml>>18); \
542 dpd2bcd8(bcd+19, sourml>>8); \
543 dpd2bcd8(bcd+22, ((sourml)<<2) | (sourlo>>30)); \
544 dpd2bcd8(bcd+25, sourlo>>20); \
545 dpd2bcd8(bcd+28, sourlo>>10); \
546 dpd2bcd83(bcd+31, sourlo);}
548 #define GETWCOEFF(df, bcd) {??} /* [should never be used] */
