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}