haskseg 0.1.0.2 → 0.1.0.3

raw patch · 2 files changed

+7/−5 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• haskseg.cabal +3/−3
• src/Text/HaskSeg/Model.hs +4/−2

@@ -4,14 +4,14 @@ -- -- see: https://github.com/sol/hpack ----- hash: 5c17f1d3fb53df989570fc2769e03a9e9156a94b8abf108d7d0997474b9c68fd+-- hash: ab8c23c09c3e94d8cb24ce7d0dae17ef963be8a3458e85433bf2945008fce6bc  name:           haskseg-version:        0.1.0.2+version:        0.1.0.3 synopsis:       Simple unsupervised segmentation model description:    Implementation of the non-parametric segmentation model described in "Type-based MCMC" (Liang, Jordan, and Klein, 2010) and "A Bayesian framework for word segmentation Exploring the effects of context" (Goldwater, Griffiths, and Johnson, 2009). category:       NLP-homepage:       https://github.com/githubuser/haskseg#readme+homepage:       https://github.com/TomLippincott/haskseg#README.md author:         Tom Lippincott maintainer:     tom@cs.jhu.edu copyright:      2018 Tom Lippincott

@@ -69,8 +69,10 @@   state' <- get   put $ state' { _counts=cleanCounts (_counts state'), _startLookup=cleanLookup (_startLookup state'), _endLookup=cleanLookup (_endLookup state') }   ll' <- unwrap <$> likelihood-  let locs = (filter (\x -> _static x /= True) . Vector.toList) (_locations state)-      locs' = (filter (\x -> _static x /= True) . Vector.toList) (_locations state')+  let locs = (Vector.toList) (_locations state)+      locs' = (Vector.toList) (_locations state')+  --let locs = (filter (\x -> _static x /= True) . Vector.toList) (_locations state)+  --    locs' = (filter (\x -> _static x /= True) . Vector.toList) (_locations state')             guesses = (map _morphFinal) locs       guesses' = (map _morphFinal) locs'       golds = (map _goldFinal) locs