Lines Matching refs:reg

88 	my ($reg) = @_;
89 	$reg =~ s/r(.)x/e\1x/;
90 	$reg =~ s/r(.)i/e\1i/;
91 	$reg =~ s/r(.)p/e\1p/;
92 	return $reg;
126 	foreach $reg (keys(%regs)) {
129 		my $val = $regs{$reg};
138 		if ($clobber =~ /$reg/ || $clobberprime =~ /$reg/) {
140 				$str = $str . " $reg => $val ";
142 			$regs{$reg} = "";
146 		if ($lastword =~ /$reg/ || $lastwordprime =~ /$reg/) {
148 				$str = $str . " $reg = $val ";