aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2026-04-30 12:34:36 -04:00
parent 4bb20c9b71
commit cbaf4c4b64
12390 changed files with 318560 additions and 27248 deletions
Download patch file Download diff file Expand all files Collapse all files

11
Task/String-matching/Factor/string-matching.factor Normal file
View file

@ -0,0 +1,11 @@
/* Does cheesecake start with cheese? */
"cheesecake" "cheese" head? ! t
/* Does cheesecake contain sec at any location? */
"sec" "cheesecake" subseq? ! t
/* Does cheesecake end with cake? */
"cheesecake" "cake" tail? ! t
/* Where in cheesecake is the leftmost sec? */
"sec" "cheesecake" subseq-start ! 4
/* Where in Mississippi are all occurrences of iss? */
USE: regexp
"Mississippi" "iss" <regexp> all-matching-slices [ from>> ] map ! { 1 4 }