Add alloc instruction to Patio IR

2 files changed, 13 insertions, 0 deletions

diff --git a/src/test/java/org/shedlang/compiler/patio/PatioInstructionSerializerTests.java b/src/test/java/org/shedlang/compiler/patio/PatioInstructionSerializerTests.java
index 1ea128c8..add91040 100644
--- a/src/test/java/org/shedlang/compiler/patio/PatioInstructionSerializerTests.java
+++ b/src/test/java/org/shedlang/compiler/patio/PatioInstructionSerializerTests.java
@@ -9,6 +9,15 @@ import static org.zwobble.precisely.Matchers.equalTo;
 
 public class PatioInstructionSerializerTests {
     @Test
+    public void canSerializeAlloc() {
+        var instruction = Patio.alloc(42);
+
+        var string = serialize(instruction);
+
+        assertThat(string, equalTo("(alloc 42)"));
+    }
+
+    @Test
     public void canSerializeDiscard() {
         var instruction = Patio.discard();
 
diff --git a/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java b/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java
index 871f45f1..ad7748bc 100644
--- a/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java
+++ b/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java
@@ -5,6 +5,10 @@ import org.shedlang.compiler.sources.Sources;
 public class Patio {
     private Patio() {}
 
+    public static PatioInstruction alloc(int bytes) {
+        return new PatioAlloc(bytes, Sources.NULL);
+    }
+
     public static PatioInstruction discard() {
         return new PatioDiscard(Sources.NULL);
     }