Add tuple-get instruction

2 files changed, 13 insertions, 0 deletions

diff --git a/src/test/java/org/shedlang/compiler/stackir/InstructionSerializerTests.java b/src/test/java/org/shedlang/compiler/stackir/InstructionSerializerTests.java
index 84df6b84..bfbec2a6 100644
--- a/src/test/java/org/shedlang/compiler/stackir/InstructionSerializerTests.java
+++ b/src/test/java/org/shedlang/compiler/stackir/InstructionSerializerTests.java
@@ -295,6 +295,15 @@ public class InstructionSerializerTests {
     }
 
     @Test
+    public void canSerializeTupleGet() {
+        var instruction = Instructions.tupleGet(2);
+
+        var string = serialize(instruction);
+
+        assertThat(string, equalTo("(tuple-get 2)"));
+    }
+
+    @Test
     public void canSerializeVarLoad() {
         var instruction = Instructions.varLoad("x");
 
diff --git a/src/test/java/org/shedlang/compiler/stackir/instructions/Instructions.java b/src/test/java/org/shedlang/compiler/stackir/instructions/Instructions.java
index 90c95941..dbef836e 100644
--- a/src/test/java/org/shedlang/compiler/stackir/instructions/Instructions.java
+++ b/src/test/java/org/shedlang/compiler/stackir/instructions/Instructions.java
@@ -106,6 +106,10 @@ public class Instructions {
         return new TupleCreateInstruction(elementCount, Sources.NULL);
     }
 
+    public static Instruction tupleGet(int elementIndex) {
+        return new TupleGetInstruction(elementIndex, Sources.NULL);
+    }
+
     public static Instruction varLoad(String name) {
         return new VarLoadInstruction(name, Sources.NULL);
     }