Is there a way to get a OsChar literal more conveniently than osp + head

`fromText . Data.Text.singleton` will do it for you, using fromText.