Add PatioDataPtrValueNull

2 files changed, 13 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 7f1aea16..cc4751f7 100644
--- a/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
+++ b/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
@@ -806,6 +806,15 @@ public class PatioSerializerTests {
         assertThat(string, equalTo("\"string\""));
     }
 
+    @Test
+    public void canSerializeDataPtrValueNull() {
+        var dataPtrValue = Patio.dataPtrValueNull();
+
+        var string = PatioTesting.serializeDataPtrValue(dataPtrValue);
+
+        assertThat(string, equalTo("null"));
+    }
+
     // == Int values ==
 
     @Test
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 b5cd226d..153062fd 100644
--- a/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java
+++ b/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java
@@ -112,6 +112,10 @@ public class Patio {
         return new PatioDataPtrValueDataElement(value);
     }
 
+    public static PatioDataPtrValue dataPtrValueNull() {
+        return new PatioDataPtrValueNull();
+    }
+
     public static PatioExceptionTypeDefinition exceptionTypeDefinition(String name, PatioType valueType) {
         return new PatioExceptionTypeDefinition(name, valueType, Sources.NULL);
     }