Add functions for working with `Colog.Message`

[srid]

co-log itself provides these:

Whereas, co-log-effectful only provides:

In my application, I'm creating a wrapper function to mimic the co-log wrappers:

log :: forall es. (HasCallStack, Log Message :> es) => Severity -> Text -> Eff es ()
log msgSeverity msgText =
  withFrozenCallStack $ logMsg $ Msg {msgStack = callStack, ..}

In context: https://github.com/juspay/vira/blob/b600377d7e271fb600a544c00625e0a232086feb/packages/vira/src/Vira/App/Logging.hs#L41-L48

Would it make sense to upstream that function to this library in some form?

[eldritch-cookie]

While i also likewise think that severity is useful, we run into the problem of what exactly should be the severity levels.

co-log-core provides a simple Debug, Info, Warning, Error(i don't like these constructor names too many potential conflicts).

But the specific severity levels desired vary from application to application, not only that but if you need another field it is significantly easier to manage if we are using types we defined.

Please note that log is already taken by a class method in Prelude, it wouldn't make sense to provide a convenience function that is annoying to use.
i am not saying that i am completely against adding something like this but

1. I would probably add it in a specific module revolving a specific message data type
2. each message data type probably would need some thought/research/consideration