Multisplit: Difference between revisions
Content added Content deleted
(→{{header|J}}: icon) |
m (→{{header|Icon}} and {{header|Unicon}}: output) |
||
| Line 59: | Line 59: | ||
every writes(multisplit(s,["==", "!=", "="])," ") | write() |
every writes(multisplit(s,["==", "!=", "="])," ") | write() |
||
# list tokens |
# list tokens and indices |
||
every ((p := "") ||:= t := multisplit(s,sep := ["==", "!=", "="])) | break write() do |
every ((p := "") ||:= t := multisplit(s,sep := ["==", "!=", "="])) | break write() do |
||
if t == !sep then writes(t," (",*p+1-*t,") ") else writes(t," ") |
if t == !sep then writes(t," (",*p+1-*t,") ") else writes(t," ") |
||
| Line 76: | Line 76: | ||
endd</lang> |
endd</lang> |
||
Sample Output: |
|||
<pre>a != == b = != c |
|||
a != (2) == (4) b = (7) != (8) c |
|||
</pre> |
|||
=={{header|J}}== |
=={{header|J}}== |
||