aboutsummaryrefslogtreecommitdiff
path: root/lib/syntax/nested_strings.ml
diff options
context:
space:
mode:
authorChimrod <>2023-11-13 10:12:42 +0100
committerChimrod <>2023-11-13 11:54:49 +0100
commit4ec7f0b73f8aa43eccf387bdec55fc464d809896 (patch)
tree9cf31bee4b23e4d48bdbd33bee49f2c25a6334a7 /lib/syntax/nested_strings.ml
parent0d5bcaea3370697822675d9f8d25bca34c02505e (diff)
Simplified the representation of expressions in strings
Diffstat (limited to 'lib/syntax/nested_strings.ml')
-rw-r--r--lib/syntax/nested_strings.ml2
1 files changed, 1 insertions, 1 deletions
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 -> []
| _ ->