Commit 0a86c5fc authored by Loïc Chapron's avatar Loïc Chapron

FIX test csv->tsv

parent ff0a77cd
{ {
"corpusPath" : "Gargantext_DocsList-nodeId-185487.csv", "corpusPath" : "Gargantext_DocsList-nodeId-185487.tsv",
"listPath" : "Gargantext_NgramsList-185488.csv", "listPath" : "Gargantext_NgramsList-185488.tsv",
"outputPath" : "data", "outputPath" : "data",
"corpusParser" : { "corpusParser" : {
"tag" : "Csv", "tag" : "Tsv",
"_csv_limit" : 1500000 "_tsv_limit" : 1500000
}, },
"listParser" : "V3", "listParser" : "V3",
"phyloName" : "bpa", "phyloName" : "bpa",
......
...@@ -38,13 +38,13 @@ data-files: ...@@ -38,13 +38,13 @@ data-files:
test-data/phylo/bpa_phylo_test.json test-data/phylo/bpa_phylo_test.json
test-data/phylo/cleopatre.golden.json test-data/phylo/cleopatre.golden.json
test-data/phylo/nadal.golden.json test-data/phylo/nadal.golden.json
test-data/phylo/nadal_docslist.golden.csv test-data/phylo/nadal_docslist.golden.tsv
test-data/phylo/nadal_ngramslist.golden.csv test-data/phylo/nadal_ngramslist.golden.tsv
test-data/phylo/issue-290-small.golden.json test-data/phylo/issue-290-small.golden.json
test-data/phylo/open_science.json test-data/phylo/open_science.json
test-data/phylo/small-phylo.golden.json test-data/phylo/small-phylo.golden.json
test-data/phylo/small_phylo_docslist.csv test-data/phylo/small_phylo_docslist.tsv
test-data/phylo/small_phylo_ngramslist.csv test-data/phylo/small_phylo_ngramslist.tsv
test-data/phylo/187481.json test-data/phylo/187481.json
test-data/phylo/phylo2dot2json.golden.json test-data/phylo/phylo2dot2json.golden.json
test-data/stemming/lancaster.txt test-data/stemming/lancaster.txt
......
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This source diff could not be displayed because it is too large. You can view the blob instead.
This source diff could not be displayed because it is too large. You can view the blob instead.
...@@ -1323,8 +1323,8 @@ ...@@ -1323,8 +1323,8 @@
"tag": "MaxClique" "tag": "MaxClique"
}, },
"corpusParser": { "corpusParser": {
"_csv_limit": 150000, "_tsv_limit": 150000,
"tag": "Csv" "tag": "Tsv"
}, },
"corpusPath": "corpus.csv", "corpusPath": "corpus.csv",
"defaultMode": false, "defaultMode": false,
......
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
...@@ -79,8 +79,8 @@ testCleopatreWithoutLinkExpectedOutput = do ...@@ -79,8 +79,8 @@ testCleopatreWithoutLinkExpectedOutput = do
testNadalWithoutLinkExpectedOutput :: Assertion testNadalWithoutLinkExpectedOutput :: Assertion
testNadalWithoutLinkExpectedOutput = do testNadalWithoutLinkExpectedOutput = do
corpusPath' <- getDataFileName "test-data/phylo/nadal_docslist.golden.csv" corpusPath' <- getDataFileName "test-data/phylo/nadal_docslist.golden.tsv"
listPath' <- getDataFileName "test-data/phylo/nadal_ngramslist.golden.csv" listPath' <- getDataFileName "test-data/phylo/nadal_ngramslist.golden.tsv"
let config = phyloTestConfig { corpusPath = corpusPath' let config = phyloTestConfig { corpusPath = corpusPath'
, listPath = listPath' , listPath = listPath'
, listParser = V3 , listParser = V3
...@@ -97,11 +97,11 @@ testNadalWithoutLinkExpectedOutput = do ...@@ -97,11 +97,11 @@ testNadalWithoutLinkExpectedOutput = do
testSmallPhyloWithoutLinkExpectedOutput :: Assertion testSmallPhyloWithoutLinkExpectedOutput :: Assertion
testSmallPhyloWithoutLinkExpectedOutput = do testSmallPhyloWithoutLinkExpectedOutput = do
bpaConfig <- getDataFileName "bench-data/phylo/bpa-config.json" bpaConfig <- getDataFileName "bench-data/phylo/bpa-config.json"
corpusPath' <- getDataFileName "test-data/phylo/small_phylo_docslist.csv" corpusPath' <- getDataFileName "test-data/phylo/small_phylo_docslist.tsv"
listPath' <- getDataFileName "test-data/phylo/small_phylo_ngramslist.csv" listPath' <- getDataFileName "test-data/phylo/small_phylo_ngramslist.tsv"
(Right config) <- fmap (\pcfg -> pcfg { corpusPath = corpusPath' (Right config) <- fmap (\pcfg -> pcfg { corpusPath = corpusPath'
, listPath = listPath' , listPath = listPath'
}) <$> (eitherDecodeFileStrict' bpaConfig) }) <$> (JSON.eitherDecodeFileStrict' bpaConfig)
mapList <- fileToList (listParser config) (listPath config) mapList <- fileToList (listParser config) (listPath config)
corpus <- fileToDocsDefault (corpusParser config) corpus <- fileToDocsDefault (corpusParser config)
(corpusPath config) (corpusPath config)
...@@ -234,8 +234,8 @@ testRelComp_Connected = do ...@@ -234,8 +234,8 @@ testRelComp_Connected = do
testToPhyloDeterminism :: Assertion testToPhyloDeterminism :: Assertion
testToPhyloDeterminism = do testToPhyloDeterminism = do
corpusPath' <- getDataFileName "test-data/phylo/GarganText_DocsList-nodeId-187481.csv" corpusPath' <- getDataFileName "test-data/phylo/GarganText_DocsList-nodeId-187481.tsv"
listPath' <- getDataFileName "test-data/phylo/GarganText_NgramsList-187482.csv" listPath' <- getDataFileName "test-data/phylo/GarganText_NgramsList-187482.tsv"
let config = phyloTestConfig { corpusPath = corpusPath' let config = phyloTestConfig { corpusPath = corpusPath'
, listPath = listPath' , listPath = listPath'
, listParser = V3 , listParser = V3
......
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