Lines Matching refs:red
686 my @red = ("mm0","mm1","mm2");
704 &pxor ($red[0],$red[0]);
706 &pxor ($red[1],$red[1]);
707 &pxor ($red[2],$red[2]);
744 &pxor ($Zhi,$red[1]) if ($i>1);
746 &pinsrw ($red[0],&WP(0,$rem_8bit,$rem[1],2),2) if ($i>0);
748 unshift (@red,pop(@red)); # "rotate" registers
761 &pxor ($red[2],$red[2]); # clear 2nd word
762 &psllq ($red[1],4);
778 &pinsrw ($red[0],&WP(0,$rem_8bit,$rem[1],2),2);
779 &pxor ($Zhi,$red[1]);
782 &pinsrw ($red[2],&WP(0,$rem_8bit,$rem[0],2),3); # last is <<48
784 &psllq ($red[0],12); # correct by <<16>>4
785 &pxor ($Zhi,$red[0]);
787 &pxor ($Zhi,$red[2]);