diff options
Diffstat (limited to 'tests/testsuite.at')
| -rw-r--r-- | tests/testsuite.at | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/testsuite.at b/tests/testsuite.at index 95c1336..887a833 100644 --- a/tests/testsuite.at +++ b/tests/testsuite.at @@ -274,15 +274,15 @@ TE_CHECK([[@EB'words-example.txt' Z-4J 2Y .-18"N(0/0)' 2C @Y Z-19"N(0/0)']], 0, AT_CLEANUP AT_SETUP([Searches]) -# FIXME: We cannot currently easily insert a single ASCII 5 (^E), as it must be followed -# by a 2nd character. It can be quoted, but cannot be written as Caret+E. -# You also cannot search for a single ASCII 5 using Caret+E. -# 2 additional ^Q are translated to a single ^Q and interpreted at the search-pattern layer. -TE_CHECK(m4_format([[@I/^Q%c/ J @:S/^Q^Q^Q%c/"F(0/0)']], 5, 5), 0, ignore, ignore) +# Searching for ^E (5) +TE_CHECK([[5@I// J @:S/^Q^Q^E<5>/"F(0/0)']], 0, ignore, ignore) +TE_CHECK([[@I/АБВГД/ J :@S/в/"F(0/0)' .-3"N(0/0)']], 0, ignore, ignore) # Canse-sensitive search TE_CHECK([[@I/XXX/J -^X @:S/xxx/"S(0/0)']], 0, ignore, ignore) +TE_CHECK([[@I/АБВГД/J -^X :@S/в/"S(0/0)']], 0, ignore, ignore) # Search mode should be local to the macro frame. TE_CHECK([[-^X @^Um{^X} Mm-0"N(0/0)']], 0, ignore, ignore) +# Anchored search TE_CHECK([[@I/XYZ/ J ::@S/X/"F(0/0)' H::@S/Z/"S(0/0)']], 0, ignore, ignore) AT_CLEANUP |