From e865446205a1009ae68f681466efbb6cbc76ca0e Mon Sep 17 00:00:00 2001
From: Michael Williamson <mike@zwobble.org>
Date: Sat, 3 Feb 2024 11:51:11 +0000
Subject: Add visibility to mutable data elements

---
 .../java/org/shedlang/compiler/patio/PatioSerializerTests.java    | 8 ++++++--
 src/test/java/org/shedlang/compiler/patio/instructions/Patio.java | 8 +++++++-
 2 files changed, 13 insertions(+), 3 deletions(-)

(limited to 'src/test/java')

diff --git a/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java b/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
index baf1bdfd..f570b7fc 100644
--- a/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
+++ b/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
@@ -62,12 +62,16 @@ public class PatioSerializerTests {
 
     @Test
     public void canSerializeDataElementMutable() {
-        var element = Patio.dataElementMutable("x", PatioDataValues.int_(42));
+        var element = Patio.dataElementMutable(
+            "x",
+            PatioVisibility.PRIVATE,
+            PatioDataValues.int_(42)
+        );
 
         var string = PatioTesting.serializeCompilationUnitElement(element);
 
         assertThat(string, equalTo("""
-            (data-mutable "x" (int 42))"""
+            (data-mutable "x" private (int 42))"""
         ));
     }
 
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 5c82321f..32cdf769 100644
--- a/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java
+++ b/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java
@@ -97,9 +97,15 @@ public class Patio {
 
     public static PatioDataElementMutable dataElementMutable(
         String name,
+        PatioVisibility visibility,
         PatioDataValue initialValue
     ) {
-        return new PatioDataElementMutable(name, initialValue, Sources.NULL);
+        return new PatioDataElementMutable(
+            name,
+            visibility,
+            initialValue,
+            Sources.NULL
+        );
     }
 
     public static PatioOperand dataPtrConst(String name) {
-- 
cgit v1.2.3