dan 01/09/12 11:39:13
Modified: . basic_opcodes.ops opcode_table
Log:
From Gregor Purdy. Adds mod_i.
Revision Changes Path
1.8 +6 -0 parrot/basic_opcodes.ops
Index: basic_opcodes.ops
===================================================================
RCS file: /home/perlcvs/parrot/basic_opcodes.ops,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -w -r1.7 -r1.8
--- basic_opcodes.ops 2001/09/11 08:26:18 1.7
+++ basic_opcodes.ops 2001/09/12 18:39:12 1.8
@@ -40,6 +40,12 @@
INT_REG(P3);
}
+// MOD Ix, Iy, Iz
+AUTO_OP mod_i {
+ INT_REG(P1) = INT_REG(P2) %
+ INT_REG(P3);
+}
+
// EQ Ix, Iy, EQ_BRANCH, NE_BRANCH
MANUAL_OP eq_i_ic {
if (INT_REG(P1) == INT_REG(P2)) {
1.9 +1 -0 parrot/opcode_table
Index: opcode_table
===================================================================
RCS file: /home/perlcvs/parrot/opcode_table,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -w -r1.8 -r1.9
--- opcode_table 2001/09/12 09:54:46 1.8
+++ opcode_table 2001/09/12 18:39:12 1.9
@@ -32,6 +32,7 @@
sub_i 3 I I I
mul_i 3 I I I
div_i 3 I I I
+mod_i 3 I I I
inc_i 1 I
inc_i_ic 2 I i
dec_i 1 I
