curVersion :: Monad m => View -> Transaction t m Version
curVersion = Branch.curVersion <=< branch
curVersion :: Monad m => View -> Transaction t m Version
curVersion = Branch.curVersion <=< branch
curVersion = Branch.curVersion <=< branch