From c38864f450f395f4efc700dcb5c1e51ca3d440c9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Alexandre=20Delano=C3=AB?= <devel+git@delanoe.org> Date: Wed, 18 Apr 2018 16:00:36 +0200 Subject: [PATCH] [PRELUDE] no global implicit any more. --- package.yaml | 2 -- src-test/Main.hs | 2 ++ src-test/Ngrams/Lang.hs | 16 +++++++++++++++ src-test/Ngrams/Lang/En.hs | 15 +++++++++++++- src-test/Ngrams/Lang/Fr.hs | 15 +++++++++++++- src-test/Ngrams/Lang/Occurrences.hs | 14 +++++++++++++ src-test/Ngrams/Metrics.hs | 17 ++++++++++++++- src-test/Parsers/Date.hs | 13 ++++++++++++ src-test/Parsers/Types.hs | 14 +++++++++++++ src-test/Parsers/WOS.hs | 15 ++++++++++++++ src/Gargantext.hs | 12 +++++++++++ src/Gargantext/API.hs | 20 ++++++++++-------- src/Gargantext/API/Auth.hs | 6 ++++-- src/Gargantext/API/Count.hs | 15 ++++++++------ src/Gargantext/API/FrontEnd.hs | 6 ++++-- src/Gargantext/API/Node.hs | 10 +++++---- src/Gargantext/API/Settings.hs | 12 ++++++++++- src/Gargantext/Database.hs | 15 ++++++++++++++ src/Gargantext/Database/Facet.hs | 17 +++++++-------- src/Gargantext/Database/Instances.hs | 19 +++++++++++++++-- src/Gargantext/Database/Ngram.hs | 22 ++++++++++++++++---- src/Gargantext/Database/Node.hs | 14 +++++++------ src/Gargantext/Database/NodeNgram.hs | 25 ++++++++++++++++++----- src/Gargantext/Database/NodeNgramNgram.hs | 24 +++++++++++++++++----- src/Gargantext/Database/NodeNode.hs | 25 ++++++++++++++++++----- src/Gargantext/Database/NodeNodeNgram.hs | 15 ++++++++++++++ src/Gargantext/Database/Queries.hs | 14 +++++++------ src/Gargantext/Database/User.hs | 14 +++++++++++++ src/Gargantext/Database/Utils.hs | 16 ++++++++++++++- src/Gargantext/Ngrams.hs | 2 ++ src/Gargantext/Ngrams/FrequentItemSet.hs | 2 ++ src/Gargantext/Ngrams/Lang/En.hs | 15 +++++++++++++- src/Gargantext/Ngrams/Lang/Fr.hs | 15 +++++++++++++- src/Gargantext/Ngrams/Letters.hs | 1 + src/Gargantext/Ngrams/List.hs | 15 ++++++++++++++ src/Gargantext/Ngrams/Metrics.hs | 2 ++ src/Gargantext/Ngrams/Occurrences.hs | 14 +++++++++++++ src/Gargantext/Ngrams/Parser.hs | 17 +++++++++++++-- src/Gargantext/Ngrams/TFICF.hs | 4 +++- src/Gargantext/Ngrams/TextMining.hs | 14 +++++++++++++ src/Gargantext/Parsers.hs | 2 ++ src/Gargantext/Parsers/Date.hs | 2 +- src/Gargantext/Parsers/WOS.hs | 14 +++++++++++++ src/Gargantext/Prelude.hs | 18 ++++++++++++---- src/Gargantext/Types.hs | 15 ++++++++++++++ src/Gargantext/Types/Main.hs | 7 ++++--- src/Gargantext/Types/Node.hs | 6 ++++-- src/Gargantext/Types/Phylo.hs | 5 +++-- src/Gargantext/Utils.hs | 15 ++++++++++++++ src/Gargantext/Utils/Count_hs | 13 ++++++++++++ src/Gargantext/Utils/DateUtils.hs | 2 +- src/Gargantext/Utils/Prefix.hs | 14 +++++++++++++ 52 files changed, 549 insertions(+), 89 deletions(-) diff --git a/package.yaml b/package.yaml index a8088a98..de6001ab 100644 --- a/package.yaml +++ b/package.yaml @@ -16,7 +16,6 @@ dependencies: library: source-dirs: src default-extensions: - - NoImplicitPrelude ghc-options: - -Wincomplete-uni-patterns - -Wincomplete-record-updates @@ -152,7 +151,6 @@ tests: main: Main.hs source-dirs: src-test default-extensions: - - NoImplicitPrelude ghc-options: - -threaded - -rtsopts diff --git a/src-test/Main.hs b/src-test/Main.hs index 1df5be16..233db0ae 100644 --- a/src-test/Main.hs +++ b/src-test/Main.hs @@ -8,6 +8,8 @@ Stability : experimental Portability : POSIX -} +{-# LANGUAGE NoImplicitPrelude #-} + import Gargantext.Prelude import Gargantext.Types.Main (Language(..)) --import qualified Ngrams.Lang.Fr as Fr diff --git a/src-test/Ngrams/Lang.hs b/src-test/Ngrams/Lang.hs index 3faa4c9f..d6e284b0 100644 --- a/src-test/Ngrams/Lang.hs +++ b/src-test/Ngrams/Lang.hs @@ -1,3 +1,19 @@ + +{-| +Module : Ngrams.Lang +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} + module Ngrams.Lang where import Gargantext.Prelude (IO()) diff --git a/src-test/Ngrams/Lang/En.hs b/src-test/Ngrams/Lang/En.hs index 637b67d1..e60552d0 100644 --- a/src-test/Ngrams/Lang/En.hs +++ b/src-test/Ngrams/Lang/En.hs @@ -1,3 +1,16 @@ +{-| +Module : Ngrams.Lang +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE NoImplicitPrelude #-} @@ -21,7 +34,7 @@ ngramsExtractionTest = hspec $ do it "\"Of\" seperates two ngrams" $ do t1 <- map (selectNgrams EN) <$> extractNgrams EN (textTest !! 0) - t1 `shouldBe` [[("Alcoholic extract of Kaempferia galanga","NN","O"),("analgesic activities","NN+CC","O"),("antiinflammatory activities","NN+CC","O"),("animal models","NN","O")]] + t1 `shouldBe` [[("Alcoholic extract of Kaempferia galanga","NN","LOCATION"),("analgesic activities","NN+CC","O"),("antiinflammatory activities","NN+CC","O"),("animal models","NN","O")]] it "Tests the conjunction of coordination in two ngrams with its adjectives" $ do t2 <- map (selectNgrams EN) <$> extractNgrams EN (textTest !! 2) diff --git a/src-test/Ngrams/Lang/Fr.hs b/src-test/Ngrams/Lang/Fr.hs index ba03a101..34c3cf08 100644 --- a/src-test/Ngrams/Lang/Fr.hs +++ b/src-test/Ngrams/Lang/Fr.hs @@ -1,3 +1,16 @@ +{-| +Module : Ngrams.Lang +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE NoImplicitPrelude #-} @@ -32,7 +45,7 @@ ngramsExtractionTest = hspec $ do it "Groupe : nom commun et adjectifs avec conjonction" $ do let textFr = "Le livre blanc et rouge." testFr <- map (selectNgrams FR) <$> (extractNgrams FR) textFr - testFr `shouldBe` [[("livre blanc","N","O"),("livre rouge","N","O")]] + testFr `shouldBe` [[("livre blanc","NC","O"),("livre rouge","NC","O")]] -- `shouldBe` [[("livre blanc et rouge","N","O")]] ? it "Groupe: Nom commun + préposition + Nom commun" $ do diff --git a/src-test/Ngrams/Lang/Occurrences.hs b/src-test/Ngrams/Lang/Occurrences.hs index b9d59a19..888467d2 100644 --- a/src-test/Ngrams/Lang/Occurrences.hs +++ b/src-test/Ngrams/Lang/Occurrences.hs @@ -1,3 +1,17 @@ +{-| +Module : Ngrams.Lang.Occurrences +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE ScopedTypeVariables #-} diff --git a/src-test/Ngrams/Metrics.hs b/src-test/Ngrams/Metrics.hs index 5e5f3bb5..2d13a8ae 100644 --- a/src-test/Ngrams/Metrics.hs +++ b/src-test/Ngrams/Metrics.hs @@ -1,6 +1,21 @@ +{-| +Module : Ngrams.Metrics +Description : +Copyright : Ngrams.Metrics (c) +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# OPTIONS_GHC -fno-warn-orphans #-} + {-# LANGUAGE CPP #-} +{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-} -{-# OPTIONS_GHC -fno-warn-orphans #-} module Ngrams.Metrics (main) where diff --git a/src-test/Parsers/Date.hs b/src-test/Parsers/Date.hs index 9246d8e8..a1ba6c97 100644 --- a/src-test/Parsers/Date.hs +++ b/src-test/Parsers/Date.hs @@ -1,3 +1,16 @@ +{-| +Module : Parsers.Date +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# LANGUAGE NoImplicitPrelude #-} module Parsers.Date where diff --git a/src-test/Parsers/Types.hs b/src-test/Parsers/Types.hs index c60e22b3..7aee9009 100644 --- a/src-test/Parsers/Types.hs +++ b/src-test/Parsers/Types.hs @@ -1,4 +1,18 @@ +{-| +Module : Parsers.Types +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# OPTIONS_GHC -fno-warn-orphans #-} + {-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE StandaloneDeriving #-} diff --git a/src-test/Parsers/WOS.hs b/src-test/Parsers/WOS.hs index 6fbc4694..32a01b63 100644 --- a/src-test/Parsers/WOS.hs +++ b/src-test/Parsers/WOS.hs @@ -1 +1,16 @@ +{-| +Module : WOS +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} + module Parsers.WOS where diff --git a/src/Gargantext.hs b/src/Gargantext.hs index c272274e..a4a4ec73 100644 --- a/src/Gargantext.hs +++ b/src/Gargantext.hs @@ -1,3 +1,15 @@ +{-| +Module : Gargantext +Description : Textmining platform +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +@Gargantext@: search, map, share +-} + module Gargantext ( module Gargantext.Database, -- module Gargantext.Ngrams, diff --git a/src/Gargantext/API.hs b/src/Gargantext/API.hs index 44523097..a86a2f17 100644 --- a/src/Gargantext/API.hs +++ b/src/Gargantext/API.hs @@ -20,15 +20,17 @@ Thanks @yannEsposito for this. {-# OPTIONS_GHC -fno-warn-name-shadowing #-} -{-# LANGUAGE DataKinds #-} -{-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE TypeOperators #-} -{-# LANGUAGE KindSignatures #-} -{-# LANGUAGE TypeFamilies #-} -{-# LANGUAGE UndecidableInstances #-} + +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE DataKinds #-} +{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE TemplateHaskell #-} +{-# LANGUAGE TypeOperators #-} +{-# LANGUAGE KindSignatures #-} +{-# LANGUAGE TypeFamilies #-} +{-# LANGUAGE UndecidableInstances #-} --------------------------------------------------------------------- module Gargantext.API diff --git a/src/Gargantext/API/Auth.hs b/src/Gargantext/API/Auth.hs index 936fad2c..0bb4b5fd 100644 --- a/src/Gargantext/API/Auth.hs +++ b/src/Gargantext/API/Auth.hs @@ -19,8 +19,10 @@ Main authorisation of Gargantext are managed in this module -} {-# OPTIONS_GHC -fno-warn-name-shadowing #-} -{-# LANGUAGE DataKinds #-} -{-# LANGUAGE TemplateHaskell #-} + +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE DataKinds #-} +{-# LANGUAGE TemplateHaskell #-} module Gargantext.API.Auth where diff --git a/src/Gargantext/API/Count.hs b/src/Gargantext/API/Count.hs index 27010280..50c98d06 100644 --- a/src/Gargantext/API/Count.hs +++ b/src/Gargantext/API/Count.hs @@ -11,12 +11,15 @@ Count API part of Gargantext. -} {-# OPTIONS_GHC -fno-warn-name-shadowing #-} -{-# LANGUAGE DataKinds #-} -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE TypeOperators #-} -{-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE DeriveAnyClass #-} -{-# LANGUAGE OverloadedStrings #-} + + +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE DataKinds #-} +{-# LANGUAGE TemplateHaskell #-} +{-# LANGUAGE TypeOperators #-} +{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE DeriveAnyClass #-} +{-# LANGUAGE OverloadedStrings #-} module Gargantext.API.Count where diff --git a/src/Gargantext/API/FrontEnd.hs b/src/Gargantext/API/FrontEnd.hs index df2fd89e..d8dd84cc 100644 --- a/src/Gargantext/API/FrontEnd.hs +++ b/src/Gargantext/API/FrontEnd.hs @@ -10,8 +10,10 @@ Portability : POSIX {-# OPTIONS_GHC -fno-warn-name-shadowing #-} -{-# LANGUAGE DataKinds #-} -{-# LANGUAGE TemplateHaskell #-} + +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE DataKinds #-} +{-# LANGUAGE TemplateHaskell #-} --------------------------------------------------------------------- module Gargantext.API.FrontEnd diff --git a/src/Gargantext/API/Node.hs b/src/Gargantext/API/Node.hs index 6c667cd5..d52014da 100644 --- a/src/Gargantext/API/Node.hs +++ b/src/Gargantext/API/Node.hs @@ -11,10 +11,12 @@ Node API -} {-# OPTIONS_GHC -fno-warn-name-shadowing #-} -{-# LANGUAGE DataKinds #-} -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE TypeOperators #-} -{-# LANGUAGE OverloadedStrings #-} + +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE DataKinds #-} +{-# LANGUAGE TemplateHaskell #-} +{-# LANGUAGE TypeOperators #-} +{-# LANGUAGE OverloadedStrings #-} ------------------------------------------------------------------- module Gargantext.API.Node diff --git a/src/Gargantext/API/Settings.hs b/src/Gargantext/API/Settings.hs index 09a4ac07..b1b0876e 100644 --- a/src/Gargantext/API/Settings.hs +++ b/src/Gargantext/API/Settings.hs @@ -1,4 +1,13 @@ -{-| +{-|PI/Application.hs +API/Count.hs +API/FrontEnd.hs +API/Node.hs +API/Auth.hs +API.hs +Database/NodeNodeNgram.hs +Database/User.hs +Database/Queries.hs + Module : Gargantext.API.Settings Description : Settings of the API (Server and Client) Copyright : (c) CNRS, 2017-Present @@ -11,6 +20,7 @@ Portability : POSIX {-# OPTIONS_GHC -fno-warn-name-shadowing #-} +{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE ScopedTypeVariables #-} diff --git a/src/Gargantext/Database.hs b/src/Gargantext/Database.hs index 51dd4405..f1620f3e 100644 --- a/src/Gargantext/Database.hs +++ b/src/Gargantext/Database.hs @@ -1,3 +1,18 @@ +{-| +Module : Gargantext.Database +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Database ( module Gargantext.Database.Utils -- , module Gargantext.Database.Instances diff --git a/src/Gargantext/Database/Facet.hs b/src/Gargantext/Database/Facet.hs index 89ec821e..a4c7d715 100644 --- a/src/Gargantext/Database/Facet.hs +++ b/src/Gargantext/Database/Facet.hs @@ -11,14 +11,15 @@ Portability : POSIX {-# OPTIONS_GHC -fno-warn-orphans #-} {-# OPTIONS_GHC -fno-warn-name-shadowing #-} -{-# LANGUAGE Arrows #-} -{-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE FlexibleContexts #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE MultiParamTypeClasses #-} -{-# LANGUAGE FunctionalDependencies #-} -{-# LANGUAGE NoMonomorphismRestriction #-} +{-# LANGUAGE Arrows #-} +{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE FlexibleContexts #-} +{-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE FunctionalDependencies #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE NoMonomorphismRestriction #-} +{-# LANGUAGE TemplateHaskell #-} ------------------------------------------------------------------------ module Gargantext.Database.Facet diff --git a/src/Gargantext/Database/Instances.hs b/src/Gargantext/Database/Instances.hs index 95a412eb..95e4ad38 100644 --- a/src/Gargantext/Database/Instances.hs +++ b/src/Gargantext/Database/Instances.hs @@ -1,7 +1,22 @@ -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE MultiParamTypeClasses #-} +{-| +Module : Gargantext.Database.Instances +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# OPTIONS_GHC -fno-warn-orphans #-} +{-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Database.Instances where import Gargantext.Prelude diff --git a/src/Gargantext/Database/Ngram.hs b/src/Gargantext/Database/Ngram.hs index 8e8fe73f..9fd6919c 100644 --- a/src/Gargantext/Database/Ngram.hs +++ b/src/Gargantext/Database/Ngram.hs @@ -1,8 +1,22 @@ -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE MultiParamTypeClasses #-} +{-| +Module : Gargantext.Databse.Ngram +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE Arrows #-} +{-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE FunctionalDependencies #-} -{-# LANGUAGE Arrows #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE TemplateHaskell #-} module Gargantext.Database.Ngram where diff --git a/src/Gargantext/Database/Node.hs b/src/Gargantext/Database/Node.hs index f841dfaa..7fae48e3 100644 --- a/src/Gargantext/Database/Node.hs +++ b/src/Gargantext/Database/Node.hs @@ -9,13 +9,15 @@ Portability : POSIX -} {-# OPTIONS_GHC -fno-warn-name-shadowing #-} -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE MultiParamTypeClasses #-} +{-# OPTIONS_GHC -fno-warn-orphans #-} + +{-# LANGUAGE Arrows #-} +{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE FunctionalDependencies #-} -{-# LANGUAGE Arrows #-} -{-# OPTIONS_GHC -fno-warn-orphans #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE TemplateHaskell #-} module Gargantext.Database.Node where diff --git a/src/Gargantext/Database/NodeNgram.hs b/src/Gargantext/Database/NodeNgram.hs index 141cdbc8..c301386e 100644 --- a/src/Gargantext/Database/NodeNgram.hs +++ b/src/Gargantext/Database/NodeNgram.hs @@ -1,9 +1,24 @@ -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE MultiParamTypeClasses #-} +{-| +Module : Gargantext.Database.NodeNgram +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# OPTIONS_GHC -fno-warn-orphans #-} + +{-# LANGUAGE Arrows #-} +{-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE FunctionalDependencies #-} -{-# LANGUAGE Arrows #-} -{-# OPTIONS_GHC -fno-warn-orphans #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE TemplateHaskell #-} module Gargantext.Database.NodeNgram where diff --git a/src/Gargantext/Database/NodeNgramNgram.hs b/src/Gargantext/Database/NodeNgramNgram.hs index 67c3c428..e7af37de 100644 --- a/src/Gargantext/Database/NodeNgramNgram.hs +++ b/src/Gargantext/Database/NodeNgramNgram.hs @@ -1,9 +1,23 @@ -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE MultiParamTypeClasses #-} +{-| +Module : Gargantext.Database.NodeNgramNgram +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# OPTIONS_GHC -fno-warn-orphans #-} +{-# LANGUAGE Arrows #-} +{-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE FunctionalDependencies #-} -{-# LANGUAGE Arrows #-} -{-# OPTIONS_GHC -fno-warn-orphans #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE TemplateHaskell #-} module Gargantext.Database.NodeNgramNgram where diff --git a/src/Gargantext/Database/NodeNode.hs b/src/Gargantext/Database/NodeNode.hs index 279673a9..d58ed42f 100644 --- a/src/Gargantext/Database/NodeNode.hs +++ b/src/Gargantext/Database/NodeNode.hs @@ -1,10 +1,25 @@ -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE MultiParamTypeClasses #-} -{-# LANGUAGE FunctionalDependencies #-} -{-# LANGUAGE Arrows #-} +{-| +Module : Gargantext.Database.NodeNode +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# OPTIONS_GHC -fno-warn-orphans #-} +{-# LANGUAGE Arrows #-} +{-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE FunctionalDependencies #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE TemplateHaskell #-} + module Gargantext.Database.NodeNode where import Prelude diff --git a/src/Gargantext/Database/NodeNodeNgram.hs b/src/Gargantext/Database/NodeNodeNgram.hs index d57f331d..a8bd082f 100644 --- a/src/Gargantext/Database/NodeNodeNgram.hs +++ b/src/Gargantext/Database/NodeNodeNgram.hs @@ -1,3 +1,18 @@ + +{-| +Module : Gargantext.Database.NodeNodeNgram +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE MultiParamTypeClasses #-} diff --git a/src/Gargantext/Database/Queries.hs b/src/Gargantext/Database/Queries.hs index cd8802b6..e9e424f6 100644 --- a/src/Gargantext/Database/Queries.hs +++ b/src/Gargantext/Database/Queries.hs @@ -9,13 +9,15 @@ Portability : POSIX -} {-# OPTIONS_GHC -fno-warn-name-shadowing #-} -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE MultiParamTypeClasses #-} + +{-# LANGUAGE Arrows #-} +{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE FunctionalDependencies #-} -{-# LANGUAGE Arrows #-} -{-# OPTIONS_GHC -fno-warn-orphans #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE TemplateHaskell #-} +{-# OPTIONS_GHC -fno-warn-orphans #-} module Gargantext.Database.Queries where diff --git a/src/Gargantext/Database/User.hs b/src/Gargantext/Database/User.hs index b0535dd4..cf951d0e 100644 --- a/src/Gargantext/Database/User.hs +++ b/src/Gargantext/Database/User.hs @@ -1,6 +1,20 @@ +{-| +Module : Gargantext.Database.user +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# OPTIONS_GHC -fno-warn-name-shadowing #-} {-# OPTIONS_GHC -fno-warn-orphans #-} + {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE MultiParamTypeClasses #-} diff --git a/src/Gargantext/Database/Utils.hs b/src/Gargantext/Database/Utils.hs index 2f147e5a..de3a6e41 100644 --- a/src/Gargantext/Database/Utils.hs +++ b/src/Gargantext/Database/Utils.hs @@ -1,5 +1,19 @@ +{-| +Module : Gargantext.Database.Util +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE FlexibleContexts #-} +{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE FlexibleContexts #-} module Gargantext.Database.Utils where diff --git a/src/Gargantext/Ngrams.hs b/src/Gargantext/Ngrams.hs index c2584319..2fe57c0c 100644 --- a/src/Gargantext/Ngrams.hs +++ b/src/Gargantext/Ngrams.hs @@ -14,6 +14,8 @@ n non negative integer -} +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Ngrams ( module Gargantext.Ngrams.Letters --, module Gargantext.Ngrams.Hetero , module Gargantext.Ngrams.CoreNLP diff --git a/src/Gargantext/Ngrams/FrequentItemSet.hs b/src/Gargantext/Ngrams/FrequentItemSet.hs index 6e191874..19647f00 100644 --- a/src/Gargantext/Ngrams/FrequentItemSet.hs +++ b/src/Gargantext/Ngrams/FrequentItemSet.hs @@ -11,6 +11,8 @@ Domain Specific Language to manage Frequent Item Set (FIS) -} +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Ngrams.FrequentItemSet ( Fis, Size , occ, cooc diff --git a/src/Gargantext/Ngrams/Lang/En.hs b/src/Gargantext/Ngrams/Lang/En.hs index 0aeba412..3c16258c 100644 --- a/src/Gargantext/Ngrams/Lang/En.hs +++ b/src/Gargantext/Ngrams/Lang/En.hs @@ -1,5 +1,18 @@ -{-# LANGUAGE OverloadedStrings #-} +{-| +Module : Gargantext.Ngrams.Lang.En +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE OverloadedStrings #-} module Gargantext.Ngrams.Lang.En (selectNgrams, groupNgrams, textTest) where diff --git a/src/Gargantext/Ngrams/Lang/Fr.hs b/src/Gargantext/Ngrams/Lang/Fr.hs index fb9489cb..6dbbdcf1 100644 --- a/src/Gargantext/Ngrams/Lang/Fr.hs +++ b/src/Gargantext/Ngrams/Lang/Fr.hs @@ -1,5 +1,18 @@ -{-# LANGUAGE OverloadedStrings #-} +{-| +Module : Gargantext.Ngrams.Lang.Fr +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE OverloadedStrings #-} module Gargantext.Ngrams.Lang.Fr (selectNgrams, groupNgrams, textTest) where diff --git a/src/Gargantext/Ngrams/Letters.hs b/src/Gargantext/Ngrams/Letters.hs index 578a5c28..71c288b9 100644 --- a/src/Gargantext/Ngrams/Letters.hs +++ b/src/Gargantext/Ngrams/Letters.hs @@ -11,6 +11,7 @@ Sugar to work on letters with Text. -} +{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-} module Gargantext.Ngrams.Letters where diff --git a/src/Gargantext/Ngrams/List.hs b/src/Gargantext/Ngrams/List.hs index 7ea2cfba..bac4b945 100644 --- a/src/Gargantext/Ngrams/List.hs +++ b/src/Gargantext/Ngrams/List.hs @@ -1,3 +1,18 @@ +{-| +Module : Gargantext.Ngrams.List +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Ngrams.List where import Data.Maybe diff --git a/src/Gargantext/Ngrams/Metrics.hs b/src/Gargantext/Ngrams/Metrics.hs index 90e2822c..f2697660 100644 --- a/src/Gargantext/Ngrams/Metrics.hs +++ b/src/Gargantext/Ngrams/Metrics.hs @@ -11,6 +11,8 @@ Portability : POSIX Mainly reexport functions in @Data.Text.Metrics@ -} +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Ngrams.Metrics (levenshtein , levenshteinNorm , damerauLevenshtein diff --git a/src/Gargantext/Ngrams/Occurrences.hs b/src/Gargantext/Ngrams/Occurrences.hs index b279dc59..5baa9968 100644 --- a/src/Gargantext/Ngrams/Occurrences.hs +++ b/src/Gargantext/Ngrams/Occurrences.hs @@ -1,3 +1,17 @@ +{-| +Module : Gargantext.Ngrams.Occurrences +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-} module Gargantext.Ngrams.Occurrences where diff --git a/src/Gargantext/Ngrams/Parser.hs b/src/Gargantext/Ngrams/Parser.hs index 3e57b36e..9471a242 100644 --- a/src/Gargantext/Ngrams/Parser.hs +++ b/src/Gargantext/Ngrams/Parser.hs @@ -1,6 +1,19 @@ -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE ScopedTypeVariables #-} +{-| +Module : Gargantext.Ngrams.Parser +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE ScopedTypeVariables #-} module Gargantext.Ngrams.Parser where diff --git a/src/Gargantext/Ngrams/TFICF.hs b/src/Gargantext/Ngrams/TFICF.hs index 32e0e024..6a1f6bbf 100644 --- a/src/Gargantext/Ngrams/TFICF.hs +++ b/src/Gargantext/Ngrams/TFICF.hs @@ -11,7 +11,9 @@ Definition of TFICF -} -{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Ngrams.TFICF where diff --git a/src/Gargantext/Ngrams/TextMining.hs b/src/Gargantext/Ngrams/TextMining.hs index 55c660f8..27048ef3 100644 --- a/src/Gargantext/Ngrams/TextMining.hs +++ b/src/Gargantext/Ngrams/TextMining.hs @@ -1,3 +1,17 @@ +{-| +Module : Gargantext.Ngrams.TextMining +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} module Gargantext.Ngrams.TextMining where diff --git a/src/Gargantext/Parsers.hs b/src/Gargantext/Parsers.hs index 29b50199..dc3f14c8 100644 --- a/src/Gargantext/Parsers.hs +++ b/src/Gargantext/Parsers.hs @@ -18,6 +18,8 @@ This module mainly describe how to add a new parser to Gargantext, please follow the types. -} +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Parsers -- (parse, FileFormat(..)) where diff --git a/src/Gargantext/Parsers/Date.hs b/src/Gargantext/Parsers/Date.hs index 032376b7..10cb1ca8 100644 --- a/src/Gargantext/Parsers/Date.hs +++ b/src/Gargantext/Parsers/Date.hs @@ -14,9 +14,9 @@ import Gargantext.Parsers.Date as DGP DGP.parseDate1 DGP.FR "12 avril 2010" == "2010-04-12T00:00:00.000+00:00" -} -{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE OverloadedStrings #-} module Gargantext.Parsers.Date (parseDate1, Lang(FR, EN), parseDate, fromRFC3339, parseTimeOfDay, getMultiplicator) where diff --git a/src/Gargantext/Parsers/WOS.hs b/src/Gargantext/Parsers/WOS.hs index 4af6a8e8..4efb3c27 100644 --- a/src/Gargantext/Parsers/WOS.hs +++ b/src/Gargantext/Parsers/WOS.hs @@ -1,3 +1,17 @@ +{-| +Module : Gargantext.Parsers.WOS +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-} module Gargantext.Parsers.WOS (wosParser) where diff --git a/src/Gargantext/Prelude.hs b/src/Gargantext/Prelude.hs index ab7d0295..f6f23597 100644 --- a/src/Gargantext/Prelude.hs +++ b/src/Gargantext/Prelude.hs @@ -1,10 +1,20 @@ +{-| +Module : Gargantext.Prelude +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# OPTIONS_GHC -fno-warn-name-shadowing #-} {-# OPTIONS_GHC -fno-warn-type-defaults #-} -{-# LANGUAGE NoImplicitPrelude #-} -{- -TODO: import head impossible from Protolude: why ? --} +{-# LANGUAGE NoImplicitPrelude #-} module Gargantext.Prelude ( module Gargantext.Prelude diff --git a/src/Gargantext/Types.hs b/src/Gargantext/Types.hs index fb9103b7..5538c237 100644 --- a/src/Gargantext/Types.hs +++ b/src/Gargantext/Types.hs @@ -1,3 +1,18 @@ +{-| +Module : Gargantext.Types +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Types ( module Gargantext.Types.Main , module Gargantext.Types.Node ) where diff --git a/src/Gargantext/Types/Main.hs b/src/Gargantext/Types/Main.hs index 7e1abd89..d5bb4940 100644 --- a/src/Gargantext/Types/Main.hs +++ b/src/Gargantext/Types/Main.hs @@ -13,9 +13,10 @@ commentary with @some markup@. {-# OPTIONS_GHC -fno-warn-name-shadowing #-} -{-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE OverloadedStrings #-} ------------------------------------------------------------------------ module Gargantext.Types.Main where diff --git a/src/Gargantext/Types/Node.hs b/src/Gargantext/Types/Node.hs index 8387bac2..187ed480 100644 --- a/src/Gargantext/Types/Node.hs +++ b/src/Gargantext/Types/Node.hs @@ -10,10 +10,12 @@ Portability : POSIX -} {-# OPTIONS_GHC -fno-warn-orphans #-} + {-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE TemplateHaskell #-} -{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE TemplateHaskell #-} -- {-# LANGUAGE DuplicateRecordFields #-} module Gargantext.Types.Node where diff --git a/src/Gargantext/Types/Phylo.hs b/src/Gargantext/Types/Phylo.hs index 9c365c6a..17b11734 100644 --- a/src/Gargantext/Types/Phylo.hs +++ b/src/Gargantext/Types/Phylo.hs @@ -18,8 +18,9 @@ the number of chars). Phylomemy was first described in [REF]. -} -{-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE TemplateHaskell #-} +{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE TemplateHaskell #-} module Gargantext.Types.Phylo where diff --git a/src/Gargantext/Utils.hs b/src/Gargantext/Utils.hs index 5d696381..dbf1087d 100644 --- a/src/Gargantext/Utils.hs +++ b/src/Gargantext/Utils.hs @@ -1,3 +1,18 @@ +{-| +Module : Gargantext.Utils +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} + module Gargantext.Utils ( -- module Gargantext.Utils.Chronos module Gargantext.Utils.Prefix diff --git a/src/Gargantext/Utils/Count_hs b/src/Gargantext/Utils/Count_hs index 8ef04876..1eaddfc7 100644 --- a/src/Gargantext/Utils/Count_hs +++ b/src/Gargantext/Utils/Count_hs @@ -1,3 +1,16 @@ +{-| +Module : Gargantext.Utils.Counts +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + {-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE ExistentialQuantification #-} {-# LANGUAGE BangPatterns #-} diff --git a/src/Gargantext/Utils/DateUtils.hs b/src/Gargantext/Utils/DateUtils.hs index 792f5768..c243aae2 100644 --- a/src/Gargantext/Utils/DateUtils.hs +++ b/src/Gargantext/Utils/DateUtils.hs @@ -1,5 +1,5 @@ {-| -Module : Gargantext. +Module : Gargantext.Utils.DateUtils Description : Copyright : (c) CNRS, 2017-Present License : AGPL + CECILL v3 diff --git a/src/Gargantext/Utils/Prefix.hs b/src/Gargantext/Utils/Prefix.hs index cfa48b08..0af23b43 100644 --- a/src/Gargantext/Utils/Prefix.hs +++ b/src/Gargantext/Utils/Prefix.hs @@ -1,3 +1,17 @@ +{-| +Module : Gargantext.Utils.Prefix +Description : +Copyright : (c) CNRS, 2017-Present +License : AGPL + CECILL v3 +Maintainer : team@gargantext.org +Stability : experimental +Portability : POSIX + +Here is a longer description of this module, containing some +commentary with @some markup@. +-} + +{-# LANGUAGE NoImplicitPrelude #-} module Gargantext.Utils.Prefix where -- 2.21.0