diff --git a/test/corpus/expressions.txt b/test/corpus/expressions.txt
index d46ca7720..eab6de7cd 100644
--- a/test/corpus/expressions.txt
+++ b/test/corpus/expressions.txt
@@ -120,3 +120,28 @@ case "12345" {
           (case_clause_pattern
             (discard)))
         (string)))))
+
+================================================================================
+Todo and panic 'as' with string expressions
+================================================================================
+
+todo as { "Hello, " <> "world!" }
+panic as { "Hello, " <> "world!" }
+
+--------------------------------------------------------------------------------
+
+(source_file
+  (todo
+    (block
+      (binary_expression
+        (string
+          (quoted_content))
+        (string
+          (quoted_content)))))
+  (panic
+    (block
+      (binary_expression
+        (string
+          (quoted_content))
+        (string
+          (quoted_content))))))