Lines Matching refs:bcd
449 /* a BCD string (uByte *bcdin) of length DECPMAX uBytes. */
474 #define GETCOEFF(df, bcd) { \
476 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
477 dpd2bcd8(bcd+1, sourhi>>10); \
478 dpd2bcd83(bcd+4, sourhi);}
479 #define GETWCOEFF(df, bcd) { \
482 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
483 dpd2bcd8(bcd+1, sourhi>>8); \
484 dpd2bcd8(bcd+4, (sourhi<<2) | (sourlo>>30)); \
485 dpd2bcd8(bcd+7, sourlo>>20); \
486 dpd2bcd8(bcd+10, sourlo>>10); \
487 dpd2bcd83(bcd+13, sourlo);}
490 #define GETCOEFF(df, bcd) { \
493 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
494 dpd2bcd8(bcd+1, sourhi>>8); \
495 dpd2bcd8(bcd+4, (sourhi<<2) | (sourlo>>30)); \
496 dpd2bcd8(bcd+7, sourlo>>20); \
497 dpd2bcd8(bcd+10, sourlo>>10); \
498 dpd2bcd83(bcd+13, sourlo);}
499 #define GETWCOEFF(df, bcd) { \
504 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
505 dpd2bcd8(bcd+1, sourhi>>4); \
506 dpd2bcd8(bcd+4, ((sourhi)<<6) | (sourmh>>26)); \
507 dpd2bcd8(bcd+7, sourmh>>16); \
508 dpd2bcd8(bcd+10, sourmh>>6); \
509 dpd2bcd8(bcd+13, ((sourmh)<<4) | (sourml>>28)); \
510 dpd2bcd8(bcd+16, sourml>>18); \
511 dpd2bcd8(bcd+19, sourml>>8); \
512 dpd2bcd8(bcd+22, ((sourml)<<2) | (sourlo>>30)); \
513 dpd2bcd8(bcd+25, sourlo>>20); \
514 dpd2bcd8(bcd+28, sourlo>>10); \
515 dpd2bcd83(bcd+31, sourlo);}
518 #define GETCOEFF(df, bcd) { \
523 *(bcd)=(uByte)DECCOMBMSD[sourhi>>26]; \
524 dpd2bcd8(bcd+1, sourhi>>4); \
525 dpd2bcd8(bcd+4, ((sourhi)<<6) | (sourmh>>26)); \
526 dpd2bcd8(bcd+7, sourmh>>16); \
527 dpd2bcd8(bcd+10, sourmh>>6); \
528 dpd2bcd8(bcd+13, ((sourmh)<<4) | (sourml>>28)); \
529 dpd2bcd8(bcd+16, sourml>>18); \
530 dpd2bcd8(bcd+19, sourml>>8); \
531 dpd2bcd8(bcd+22, ((sourml)<<2) | (sourlo>>30)); \
532 dpd2bcd8(bcd+25, sourlo>>20); \
533 dpd2bcd8(bcd+28, sourlo>>10); \
534 dpd2bcd83(bcd+31, sourlo);}
536 #define GETWCOEFF(df, bcd) {??} /* [should never be used] */
