Commit d88a02aa authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] Haddock for our lib only + fix Tests

parent 9dfd60b4
Pipeline #3092 passed with stage
in 92 minutes and 17 seconds
...@@ -2,4 +2,4 @@ ...@@ -2,4 +2,4 @@
#stack install --nix --profile --test --fast --no-install-ghc --skip-ghc-check #stack install --nix --profile --test --fast --no-install-ghc --skip-ghc-check
env LANG=C.UTF-8 stack install --haddock --nix --test --no-install-ghc --skip-ghc-check env LANG=C.UTF-8 stack install --haddock --nix --test --no-install-ghc --skip-ghc-check --no-haddock-deps
...@@ -14,7 +14,7 @@ Portability : POSIX ...@@ -14,7 +14,7 @@ Portability : POSIX
module Graph.Clustering where module Graph.Clustering where
import Gargantext.API.Ngrams.Types (NgramsTerm(..)) import Gargantext.API.Ngrams.Types (NgramsTerm(..))
import Gargantext.Core.Viz.Graph (Graph(..)) import Gargantext.Core.Viz.Graph (Graph(..), Strength(..))
import Gargantext.Core.Viz.Graph.Tools (doDistanceMap) import Gargantext.Core.Viz.Graph.Tools (doDistanceMap)
import Gargantext.Core.Viz.Graph.Tools.IGraph (spinglass) import Gargantext.Core.Viz.Graph.Tools.IGraph (spinglass)
import Gargantext.Prelude import Gargantext.Prelude
...@@ -35,7 +35,7 @@ test :: IO () ...@@ -35,7 +35,7 @@ test :: IO ()
test = hspec $ do test = hspec $ do
describe "Cross" $ do describe "Cross" $ do
let let
(distanceMap,_,_) = doDistanceMap Conditional 0 myCooc (distanceMap,_,_) = doDistanceMap Conditional 0 Weak myCooc
it "Partition test" $ do it "Partition test" $ do
partitions <- spinglass 1 distanceMap partitions <- spinglass 1 distanceMap
let let
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment