src/Gargantext/Database.hs

   1 {-|
   2 Module      : Gargantext.Database
   3 Description : Tools for Database
   4 Copyright   : (c) CNRS, 2017-Present
   5 License     : AGPL + CECILL v3
   6 Maintainer  : team@gargantext.org
   7 Stability   : experimental
   8 Portability : POSIX
   9
  10 All Database related stuff here.
  11
  12 Target: just import this module and nothing else to work with
  13 Gargantext's database.
  14
  15 -}
  16
  17
  18 module Gargantext.Database ( module Gargantext.Database.Prelude
  19                            , module Gargantext.Database.Schema.NodeNode
  20                            , insertDB
  21                         -- , module Gargantext.Database.Bashql
  22                            )
  23     where
  24
  25 import Gargantext.Prelude
  26 import Gargantext.Database.Prelude -- (connectGargandb)
  27
  28 -- import Gargantext.Database.Schema.Node
  29 -- import Gargantext.Database.Query.Table.Node
  30
  31 import Gargantext.Database.Schema.NodeNode -- (NodeNode(..))
  32 import Gargantext.Database.Query.Table.NodeNode
  33
  34
  35 class InsertDB a where
  36   insertDB :: a -> Cmd err Int
  37
  38 {-
  39 class DeleteDB a where
  40   deleteDB :: a -> Cmd err Int
  41 -}
  42
  43 instance InsertDB [NodeNode] where
  44   insertDB = insertNodeNode
  45
  46
  47 {-
  48 instance InsertDB [Node a] where
  49   insertDB = insertNodes'
  50
  51 instance InsertDB [NodeNodeNgram] where
  52   insertDB = ...
  53
  54
  55 -}