From 009852fcfcbae6679c9155a7f1f2bd819e748b59 Mon Sep 17 00:00:00 2001
From: Michael Williamson <mike@zwobble.org>
Date: Wed, 19 Jul 2023 20:59:10 +0100
Subject: Add memory-store instruction to Patio IR

---
 .../compiler/patio/PatioInstructionSerializer.java      |  6 ++++++
 .../compiler/patio/instructions/PatioInstruction.java   |  2 +-
 .../compiler/patio/instructions/PatioMemoryStore.java   | 17 +++++++++++++++++
 3 files changed, 24 insertions(+), 1 deletion(-)
 create mode 100644 src/main/java/org/shedlang/compiler/patio/instructions/PatioMemoryStore.java

(limited to 'src/main/java')

diff --git a/src/main/java/org/shedlang/compiler/patio/PatioInstructionSerializer.java b/src/main/java/org/shedlang/compiler/patio/PatioInstructionSerializer.java
index fad162dd..42420d00 100644
--- a/src/main/java/org/shedlang/compiler/patio/PatioInstructionSerializer.java
+++ b/src/main/java/org/shedlang/compiler/patio/PatioInstructionSerializer.java
@@ -43,6 +43,12 @@ public class PatioInstructionSerializer {
                     treeNamed("offset", treeInt(memoryLoad.offset()))
                 );
 
+            case PatioMemoryStore memoryStore ->
+                treeList(
+                    treeIdentifier("memory-store"),
+                    treeNamed("offset", treeInt(memoryStore.offset()))
+                );
+
             case PatioReturn return_ ->
                 treeList(treeIdentifier("return"));
         };
diff --git a/src/main/java/org/shedlang/compiler/patio/instructions/PatioInstruction.java b/src/main/java/org/shedlang/compiler/patio/instructions/PatioInstruction.java
index 2083f0d3..a5323ae5 100644
--- a/src/main/java/org/shedlang/compiler/patio/instructions/PatioInstruction.java
+++ b/src/main/java/org/shedlang/compiler/patio/instructions/PatioInstruction.java
@@ -2,6 +2,6 @@ package org.shedlang.compiler.patio.instructions;
 
 import org.shedlang.compiler.sources.Source;
 
-public sealed interface PatioInstruction permits PatioAlloc, PatioDiscard, PatioMemoryLoad, PatioReturn {
+public sealed interface PatioInstruction permits PatioAlloc, PatioDiscard, PatioMemoryLoad, PatioMemoryStore, PatioReturn {
     Source source();
 }
diff --git a/src/main/java/org/shedlang/compiler/patio/instructions/PatioMemoryStore.java b/src/main/java/org/shedlang/compiler/patio/instructions/PatioMemoryStore.java
new file mode 100644
index 00000000..7d7d4a83
--- /dev/null
+++ b/src/main/java/org/shedlang/compiler/patio/instructions/PatioMemoryStore.java
@@ -0,0 +1,17 @@
+package org.shedlang.compiler.patio.instructions;
+
+import org.shedlang.compiler.sources.Source;
+
+/**
+ * Pop a pointer and a value from the stack. Store the value at the given offset
+ * from that pointer.
+ *
+ * <p>Specifically, the values should have been pushed onto the stack in the following order:</p>
+ *
+ * <ul>
+ *     <li>The pointer.</li>
+ *     <li>The value to store.</li>
+ * </ul>
+ */
+public record PatioMemoryStore(int offset, Source source) implements PatioInstruction {
+}
-- 
cgit v1.2.3