Multisplit: Difference between revisions

m
Line 59:
every writes(multisplit(s,["==", "!=", "="])," ") | write()
# list tokens and indices
every ((p := "") ||:= t := multisplit(s,sep := ["==", "!=", "="])) | break write() do
if t == !sep then writes(t," (",*p+1-*t,") ") else writes(t," ")
Line 76:
endd</lang>
 
Sample Output:
 
<pre>a != == b = != c
 
a != (2) == (4) b = (7) != (8) c
</pre>
 
=={{header|J}}==
Anonymous user