String matching: Difference between revisions

m
→‎{{header|Tailspin}}: correction to give correct answer that banana ends with na
(→‎{{header|Tailspin}}: syntax update also adding new possible solution and improving index-counter)
m (→‎{{header|Tailspin}}: correction to give correct answer that banana ends with na)
Line 3,722:
@: 0;
(<ends|'.*'>) $@
rule ends: (<~='$s;.'>?* <='$s;'> -> @:1;)
end endsWith
 
Line 3,747:
' -> !OUT::write
'abcd' -> find&{s:'e'} -> !OUT::write
'
' -> !OUT::write
'banana' -> find&{s:'na'} -> !OUT::write
</lang>
{{out}}
Line 3,754 ⟶ 3,757:
abcd contains bc
e cannot be found in abcd
banana ends with na
</pre>
 
Anonymous user