205   #define sourmh sourar[2]	   /* and the mid-high word */  in decimal128ToNumber()  macro
214     sourmh=pu[2];		   /* then the mid-high */  in decimal128ToNumber()
219     sourmh=pu[1];		   /* then the mid-high */  in decimal128ToNumber()
253      else if (sourmh) need=10;  in decimal128ToNumber()
299   #define sourmh sourar[2]	   /* and the mid-high word */  in decimal128ToString()  macro
308     sourmh=pu[2];		   /* then the mid-high */  in decimal128ToString()
313     sourmh=pu[1];		   /* then the mid-high */  in decimal128ToString()
334     if (sourlo==0 && sourml==0 && sourmh==0  in decimal128ToString()
358   dpd=((sourhi&0xf)<<6) | (sourmh>>26);	     /* declet 2 */  in decimal128ToString()
360   dpd=(sourmh>>16)&0x3ff;		     /* declet 3 */  in decimal128ToString()
362   dpd=(sourmh>>6)&0x3ff;		     /* declet 4 */  in decimal128ToString()
364   dpd=((sourmh&0x3f)<<4) | (sourml>>28);     /* declet 5 */  in decimal128ToString()