Napkin.Run.Effects.Interpreters.Sql
type SqlIO m = MonadCatch m #
safeIO :: (SqlIO m, Members [FatalError, Embed m] r) => m v -> Sem r v #