Add memory-fill instruction to Patio

2 files changed, 28 insertions, 0 deletions

diff --git a/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java b/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
index fdd8ee65..29110e81 100644
--- a/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
+++ b/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
@@ -423,6 +423,26 @@ public class PatioSerializerTests {
     }
 
     @Test
+    public void canSerializeMemoryFill() {
+        var instruction = Patio.memoryFill(
+            Patio.localRef("pointer"),
+            Patio.byteConst((byte)4),
+            Patio.intConst(20)
+        );
+
+        var string = PatioTesting.serializeInstruction(instruction);
+
+        assertThat(string, equalTo("""
+            (
+                memory-fill
+                (local "pointer")
+                (byte-const 4)
+                (int-const 20)
+            )"""
+        ));
+    }
+
+    @Test
     public void canSerializeMemoryLoad() {
         var instruction = Patio.memoryLoad(
             Patio.localRef("destination"),
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 2ac14323..d3fce63d 100644
--- a/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java
+++ b/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java
@@ -236,6 +236,14 @@ public class Patio {
         return new PatioLoopContinue(Sources.NULL);
     }
 
+    public static PatioInstruction memoryFill(
+        PatioOperand pointer,
+        PatioOperand value,
+        PatioOperand length
+    ) {
+        return new PatioMemoryFill(pointer, value, length, Sources.NULL);
+    }
+
     public static PatioInstruction memoryLoad(
         PatioLocalRef destination,
         PatioOperand pointer,