Function decCheckInexact

extern/decNumber/decNumber.c:8055–8071

------------------------------------------------------------------ */ decCheckInexact -- check a normal finite inexact result has digits */ dn is the number to check */ set is the context (for status and precision) */ sets Invalid operation, etc., if some digits are missing */ [this check is not made for DECSUBSET compilation or whe

/* subnormal is not set]                                              */
/* ------------------------------------------------------------------ */
static void decCheckInexact(const decNumber *dn, decContext *set) {
  #if !DECSUBSET && DECEXTFLAG
    if ((set->status & (DEC_Inexact|DEC_Subnormal))==DEC_Inexact
     && (set->digits!=dn->digits) && !(dn->bits & DECSPECIAL)) {
      #if DECTRACE || DECVERB
      printf("Insufficient digits [%ld] on normal Inexact result.\n",
             (LI)dn->digits);
      decNumberShow(dn);
      #endif
      decContextSetStatus(set, DEC_Invalid_operation);
      }
  #else
    // next is a noop for quiet compiler
    if (dn!=NULL && dn->digits==0) set->status|=DEC_Invalid_operation;
  #endif
  return;
  } // decCheckInexact
#endif

#if DECALLOC