Annotation of parser3/tests/477.html, revision 1.1
1.1 ! moko 1: # ^string.pos[substr](n) and ^string.rpos[substr](n) in a single-byte charset (the default one is UTF-8):
! 2: # n is the lowest position of the substr start for pos and the highest one for rpos
! 3: @main[]
! 4: ^1251[]
! 5:
! 6: $empty[]
! 7:
! 8: 1. the results for n=0..length and n=100:
! 9: ^scan[a.b.c.d;.]
! 10: ^scan[abab;ab]
! 11: ^scan[aaaa;aa]
! 12: ^scan[abacad;ab]
! 13: ^scan[abab;abab]
! 14: ^scan[abab;ababa]
! 15: ^scan[привет, мир, пока;, ]
! 16: ^scan[привет, мир, пока;ир]
! 17: ^scan[привет, мир, пока;я]
! 18: ^scan[abab;$empty]
! 19: ^scan[$empty;a]
! 20:
! 21: 2. the string made of pieces, not of one literal:
! 22: $p[ab.]$q[.cd.ef]
! 23: ^scan[${p}${q};.]
! 24:
! 25: 3. wrong parameters:
! 26: $s[a.b.c.d]
! 27: ^show{^^s.rpos[.](-1)}
! 28: ^show{^^s.rpos[.](x)}
! 29: ^show{^^s.rpos{.}}
! 30:
! 31: @scan[str;substr]
! 32: <b>'$str' '$substr'</b><br />
! 33: ^line[$str;$substr;pos]
! 34: ^line[$str;$substr;rpos]
! 35:
! 36: @line[str;substr;method][len;n]
! 37: $len(^str.length[])
! 38: ${method}: ^str.$method[$substr]; (0..$len) ^for[n](0;$len){^str.$method[$substr]($n)}[ ]; (100) ^str.$method[$substr](100)<br />
! 39:
! 40: @show[code]
! 41: ${code}: ^try-catch-comment{^process{$code}}<br />
E-mail: