Tokenize a string: Difference between revisions
Content added Content deleted
m (→Version #2.: adding comment) |
|||
Line 136: | Line 136: | ||
-- Text -> Text -> [Text] |
-- splitOn :: Text -> Text -> [Text] |
||
on splitOn(strDelim, strMain) |
on splitOn(strDelim, strMain) |
||
set {dlm, my text item delimiters} to {my text item delimiters, strDelim} |
set {dlm, my text item delimiters} to {my text item delimiters, strDelim} |
||
Line 144: | Line 144: | ||
end splitOn |
end splitOn |
||
-- Text -> [Text] -> Text |
-- intercalate :: Text -> [Text] -> Text |
||
on intercalate(strText, lstText) |
on intercalate(strText, lstText) |
||
set {dlm, my text item delimiters} to {my text item delimiters, strText} |
set {dlm, my text item delimiters} to {my text item delimiters, strText} |