File:  [parser3project] / parser3 / tests / 059.html
Revision 1.2: download - view: text, annotated - select for diffs - revision graph
Thu Jul 24 11:25:57 2003 UTC (22 years, 11 months ago) by paf
Branches: MAIN
CVS tags: release_3_2_1, release_3_2_0, release_3_1_6, release_3_1_5, release_3_1_4, release_3_1_3, release_3_1_2, release_3_1_1, release_3_1_0, paf_left, HEAD
merged(copied) to HEAD from template_gc

@main[]
...^oneOf[a;a,b,c]...<br>
#...^oneOf[a;ax,b,c]...<br>
...^oneWord[word]...<br>
#...^oneWord[wo rd]...<br>


@oneOf[s;list][t] выдаёт строку, если строка она есть в списке(разделенном запятыми)
$t[^list.lsplit[,]]
^if(!^t.locate[piece;$s]){^throw[user;$s;unknown]}
$result[$s]

@oneWord[s]
^if(^s.match[\W]){^throw[user.data;$s;not word]}{$s}

E-mail: