From f525339cdcab1a44d370ffe619d46bdc2116c3b5 Mon Sep 17 00:00:00 2001
From: Michael Williamson <mike@zwobble.org>
Date: Sat, 22 Jul 2023 11:06:46 +0100
Subject: Add struct as Patio data value

---
 .../org/shedlang/compiler/patio/PatioSerializerTests.java   | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(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 1b07b144..8da11ef2 100644
--- a/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
+++ b/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java
@@ -467,4 +467,17 @@ public class PatioSerializerTests {
 
         assertThat(string, equalTo("(int 42)"));
     }
+
+    @Test
+    public void canSerializeDataValueStruct() {
+        var value = PatioDataValues.struct(List.of(
+            PatioDataValues.byte_(0x01),
+            PatioDataValues.byte_(0x02),
+            PatioDataValues.byte_(0x03)
+        ));
+
+        var string = PatioTesting.serializeDataValue(value);
+
+        assertThat(string, equalTo("(struct ((byte 0x01) (byte 0x02) (byte 0x03)))"));
+    }
 }
-- 
cgit v1.2.3