$instargs[($instnumb << 2) + $i + 1]=$argstypes{$argslist[$i]};
}
}
-
+
if (not exists $insttext{$wordlist[2]}) {
$insttext[$nbinst]=$wordlist[2];
$insttext{$wordlist[2]}=$nbinst++;
print INST_IMP " ","*"x76,"/\n";
print INST_IMP "int\n";
print INST_IMP "cpu8051_OP_$a_opcodehex[$i](void)\n";
-# TEST hugo new...
-# print INST_DEF "int OP_$a_opcodehex[$i]( );\n";
print INST_IMP "{\n";
if( $i == 0x85 ) {
if ($op_destination == 5) { # @R1
print INST_IMP "unsigned char destination = cpu8051_ReadI ( cpu8051_ReadD( BANKPSW + _R1_ ) );\n";
}
-
+
if ($op_destination == 6) { # R0
print INST_IMP "unsigned char destination = cpu8051_ReadD( BANKPSW + _R0_ );\n";
}