Add Patio data value null data ptr

1 files changed, 9 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 f3371dc3..00bf8c4f 100644
--- a/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
+++ b/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
@@ -932,6 +932,15 @@ public class PatioSerializerTests {
     }
 
     @Test
+    public void canSerializeDataValueDataPointerNull() {
+        var value = PatioDataValues.dataPointerNull();
+
+        var string = PatioTesting.serializeDataValue(value);
+
+        assertThat(string, equalTo("(data-ptr null)"));
+    }
+
+    @Test
     public void canSerializeDataValueInt() {
         var value = PatioDataValues.int_(42);