[Feature] LexicalMap

[dishmint]

Apply a StringReplace of a certain function on lexical patterns

LexicalMap[f, expr, lp]

LexicalMap[ToUpperCase, "This is cool", TextType["Adjective"] | TextType["Verb"]]

(* expected output *)
"This IS COOL"

[dishmint]

And of course with a levelspec: LexicalMap[f, expr, lp, pos]

[dishmint]

Wait, level spec doesn't make any sense, expr is a string..

[dishmint]

Simple enough to implement.

[dishmint]

This already works with StringReplace, though I like the design of Map.

LexicalMap[ToUpperCase, "This is cool", TextType["Adjective"|"Verb"]]

vs

StringReplace["This is cool", LexicalPattern[match:TextType["Adjective"|"Verb"] :> ToUpperCase[match]]]

[dishmint]

I've implemented it, but some longstanding behavior has reared its head. Note what gets replaced around "is cool" the spacing is inconsistent. an adjective text type should match just the text type and the spaces, but only bind to the word.

[dishmint]

Maybe setting the MatchTrim option in the StringReplace UpValue?