diff --git a/tests/text.nom b/tests/text.nom
index 2e08e45..6b4f2b5 100644
--- a/tests/text.nom
+++ b/tests/text.nom
@@ -13,3 +13,12 @@ assume ("\n" = (newline)) or barf "Text literals failed."
 assume (("x" + "y") = "xy")
 
 say "Text test passed."
+
+immediately:
+    parse [アクション %spec %body] as: action %spec %body
+
+%こんにちは <- "こんにちは"
+アクション [% と言う]:
+    "\(%)世界"
+
+assume ((%こんにちは と言う) = "こんにちは世界") or barf "Unicode doesn't work"