Documentation

type AnnotateReadIO m bk = (SqlIO m, MonadNapkin bk m, Command ReadAnnotationCommand TableAnnotations bk) #

runAnnotateReadIO :: (AnnotateReadIO m bk, Members [Embed m, FatalError] r) => BackendConn bk -> Sem (AnnotateRead bk ': r) a -> Sem r a #