From 486a1a499da88239f625c0bcc913c41c01496e3c Mon Sep 17 00:00:00 2001 From: Michael Williamson Date: Sun, 17 Sep 2023 18:07:10 +0100 Subject: Add tuple-create instruction --- .../shedlang/compiler/stackir/InstructionSerializerTests.java | 9 +++++++++ .../org/shedlang/compiler/stackir/instructions/Instructions.java | 4 ++++ 2 files changed, 13 insertions(+) (limited to 'src/test/java') diff --git a/src/test/java/org/shedlang/compiler/stackir/InstructionSerializerTests.java b/src/test/java/org/shedlang/compiler/stackir/InstructionSerializerTests.java index b8a45a0b..84df6b84 100644 --- a/src/test/java/org/shedlang/compiler/stackir/InstructionSerializerTests.java +++ b/src/test/java/org/shedlang/compiler/stackir/InstructionSerializerTests.java @@ -285,6 +285,15 @@ public class InstructionSerializerTests { assertThat(string, equalTo("(string-add)")); } + @Test + public void canSerializeTupleCreate() { + var instruction = Instructions.tupleCreate(2); + + var string = serialize(instruction); + + assertThat(string, equalTo("(tuple-create 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 ee48a1bd..90c95941 100644 --- a/src/test/java/org/shedlang/compiler/stackir/instructions/Instructions.java +++ b/src/test/java/org/shedlang/compiler/stackir/instructions/Instructions.java @@ -102,6 +102,10 @@ public class Instructions { return new StringAddInstruction(Sources.NULL); } + public static Instruction tupleCreate(int elementCount) { + return new TupleCreateInstruction(elementCount, Sources.NULL); + } + public static Instruction varLoad(String name) { return new VarLoadInstruction(name, Sources.NULL); } -- cgit v1.2.3