# Converted from capitalization.c | |
table: | | |
include tables/spaces.uti | |
uplow Aa 1 | |
uplow Bb 2 | |
uplow Cc 3 | |
uplow Xx 4 | |
uplow Yy 5 | |
uplow Zz 6 | |
sign - 23 | |
seqdelimiter - | |
sign + 12 | |
sign [ 13 | |
sign ] 14 | |
sign < 15 | |
sign > 16 | |
capsletter 12 | |
begcapsword 13 | |
endcapsword 14 | |
lencapsphrase 3 | |
begcaps 15 | |
endcaps 16 | |
flags: {testmode: bothDirections} | |
tests: | |
- [Abc, '+abc'] | |
- [ABC, '[abc'] | |
- [AbcXyz, '+abc+xyz'] | |
- [ABcXYz, '[ab]c[xy]z'] | |
- [ABC-XYZ, '[abc-[xyz'] | |
- [ABC XYZ ABC, '<abc xyz abc>'] | |
- [ABC-XYZ-ABC, '[abc-[xyz-[abc'] | |
- [ABC XYZ-ABC, '[abc [xyz-[abc'] | |
- ['ABC XYZ ABC ', '<abc xyz abc> '] | |
- [ABC XYZ ABC XYZ, '<abc xyz abc xyz>'] | |
- [ABC-XYZ-ABC-XYZ, '[abc-[xyz-[abc-[xyz'] | |
- [ABC XYZ-ABC-XYZ, '[abc [xyz-[abc-[xyz'] | |
- [ABC XYZ ABC-XYZ, '<abc xyz abc-xyz>'] | |
- [A B C, '<a b c>'] | |
- ['A B C ', '<a b c> '] | |
- [A-B-C, '+a-+b-+c'] | |
- [AB-X-BC, '[ab-+x-[bc'] |