packages feed

hasbolt-extras 0.0.0.19 → 0.0.0.20

raw patch · 5 files changed

+13/−1 lines, 5 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

+ Database.Bolt.Extras.DSL: With :: [Text] -> next -> Expr next
+ Database.Bolt.Extras.DSL: withF :: [Text] -> Free Expr ()
- Database.Bolt.Extras.Graph: relations :: forall n_aann a_aano b_aanp b_akSx. Lens (Graph n_aann a_aano b_aanp) (Graph n_aann a_aano b_akSx) (Map (n_aann, n_aann) b_aanp) (Map (n_aann, n_aann) b_akSx)
+ Database.Bolt.Extras.Graph: relations :: forall n_aaqw a_aaqx b_aaqy b_akY0. Lens (Graph n_aaqw a_aaqx b_aaqy) (Graph n_aaqw a_aaqx b_akY0) (Map (n_aaqw, n_aaqw) b_aaqy) (Map (n_aaqw, n_aaqw) b_akY0)
- Database.Bolt.Extras.Graph: vertices :: forall n_aann a_aano b_aanp a_akSy. Lens (Graph n_aann a_aano b_aanp) (Graph n_aann a_akSy b_aanp) (Map n_aann a_aano) (Map n_aann a_akSy)
+ Database.Bolt.Extras.Graph: vertices :: forall n_aaqw a_aaqx b_aaqy a_akY1. Lens (Graph n_aaqw a_aaqx b_aaqy) (Graph n_aaqw a_akY1 b_aaqy) (Map n_aaqw a_aaqx) (Map n_aaqw a_akY1)

Files

CHANGELOG.md view
@@ -6,6 +6,10 @@  ## [Unreleased] +## [0.0.0.20] - 2019-09-06+### Added+- `WITH` statement in DSL.+ ## [0.0.0.19] - 2019-07-09 ### Changed - Directed relationship in graph get dsl instead of undirected.
hasbolt-extras.cabal view
@@ -1,5 +1,5 @@ name:           hasbolt-extras-version:        0.0.0.19+version:        0.0.0.20 synopsis:       Extras for hasbolt library description:    Extras for hasbolt library homepage:       https://github.com/biocad/hasbolt-extras#readme
src/Database/Bolt/Extras/DSL/Internal/Executer.hs view
@@ -30,6 +30,7 @@ execute (DetachDelete t n)  = executeHelperT "DETACH DELETE " t n execute (Remove t n)        = executeHelperT "REMOVE " t n execute (Return t n)        = executeHelperT "RETURN " t n+execute (With t n)          = executeHelperT "WITH " t n execute (Text t n)          = tell [t] >> pure n  -- | Helper to translate 'Expr' with something, which can be translated to cypher.
src/Database/Bolt/Extras/DSL/Internal/Language.hs view
@@ -10,6 +10,7 @@   , detachDeleteF   , removeF   , returnF+  , withF   , textF   ) where @@ -67,6 +68,11 @@ -- returnF :: [Text] -> Free Expr () returnF txts = liftF (Return txts ())++-- | Prepare 'WITH' query+--+withF :: [Text] -> Free Expr ()+withF txts = liftF (With txts ())  -- | Prepare query with custom text --
src/Database/Bolt/Extras/DSL/Internal/Types.hs view
@@ -105,6 +105,7 @@                | DetachDelete [Text] next     -- ^ DETACH DELETE query                | Remove [Text] next           -- ^ REMOVE query                | Return [Text] next           -- ^ RETURN query+               | With [Text] next             -- ^ WITH query                | Text Text next               -- ^ free text query   deriving (Show, Eq, Functor)