Lines Matching refs:opcode
708 { my $opcode=(0x14<<26)|($2<<21)|($3<<16)|(($1&0x1FF8)<<1)|(($1>>13)&1);
709 $opcode|=(1<<3) if ($mod =~ /^,m/);
710 $opcode|=(1<<2) if ($mod =~ /^,mb/);
711 sprintf "\t.WORD\t0x%08x\t; %s",$opcode,$orig;
721 { my $opcode=(0x1c<<26)|($3<<21)|($1<<16)|(($2&0x1FF8)<<1)|(($2>>13)&1);
722 sprintf "\t.WORD\t0x%08x\t; %s",$opcode,$orig;
733 { my $opcode=(0x36<<26)|($1<<21)|($4<<16);
735 $opcode |= (($2&0x20)<<6)|(($2&0x1f)<<5); # encode pos
736 $opcode |= (($len&0x20)<<7)|($len&0x1f); # encode len
737 sprintf "\t.WORD\t0x%08x\t; %s",$opcode,$orig;
740 { my $opcode=(0x34<<26)|($1<<21)|($3<<16)|(2<<11)|(1<<9);
742 $opcode |= (($len&0x20)<<3)|($len&0x1f); # encode len
743 $opcode |= (1<<13) if ($mod =~ /,\**=/);
744 sprintf "\t.WORD\t0x%08x\t; %s",$opcode,$orig;
754 { my $opcode=(0x34<<26)|($2<<21)|($1<<16)|(1<<10)|$4;
756 $opcode |= (($cpos&0x20)<<6)|(($cpos&0x1f)<<5); # encode sa
757 sprintf "\t.WORD\t0x%08x\t; %s",$opcode,$orig;
768 my $opcode = eval("\$$mnemonic");
770 ref($opcode) eq 'CODE' ? &$opcode($mod,$args) : "\t$mnemonic$mod\t$args";