--- parser3/tests/059.html 2007/08/17 13:13:37 1.3 +++ parser3/tests/059.html 2010/07/25 06:23:41 1.5 @@ -1,10 +1,11 @@ @main[] +^windows-1251[] + ...^oneOf[a;a,b,c]...
...^oneOf[a;ax,b,c]...
...^oneWord[Word]...
...^oneWord[wo rd]...
- @oneOf[s;list][t] выдаёт строку, если строка она есть в списке(разделенном запятыми) $t[^list.lsplit[,]] ^try{ @@ -19,7 +20,6 @@ $t[^list.lsplit[,]] } } - @oneWord[s] ^try{ ^if(^s.match[\W]){ @@ -32,4 +32,3 @@ $t[^list.lsplit[,]] $result['$s' not a word] } } -