From 4ec7f0b73f8aa43eccf387bdec55fc464d809896 Mon Sep 17 00:00:00 2001
From: Chimrod <>
Date: Mon, 13 Nov 2023 10:12:42 +0100
Subject: Simplified the representation of expressions in strings

---
 lib/syntax/nested_strings.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/syntax/nested_strings.ml')

diff --git a/lib/syntax/nested_strings.ml b/lib/syntax/nested_strings.ml
index 7e49ace..4dd5c81 100644
--- a/lib/syntax/nested_strings.ml
+++ b/lib/syntax/nested_strings.ml
@@ -21,7 +21,7 @@ module Expression = TypeBuilder.Make (struct
       =
    fun pos content _type_of ->
     match content with
-    | [ T.Expression [ (t', _) ]; T.Text "" ] -> (
+    | [ T.Expression (t', _); T.Text "" ] -> (
         match Get_type.get_type (Lazy.force t') with
         | Get_type.Integer -> []
         | _ ->
-- 
cgit v1.2.3