GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-29 06:22:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

removed some clashes from Dictionary ; corrected the probability of IdRP after elimination of that_RP

Browse Source
This commit is contained in:
aarne
2014-05-06 21:43:51 +00:00
parent b0504d2c4a
commit f4ca89a416
21 changed files with 451 additions and 459 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/src/translator/CheckDict.hs
View File

@@ -97,7 +97,7 @@ splitFun f = case span (/='_') (reverse f) of (tac,nuf) -> (reverse nuf, reverse
------ word statistics
isUnchecked line = isInfixOf "--" line -- checked = no comments
isUnknown line = isInfixOf "variants" line -- known = not variants {}
isUnknown line = isInfixOf "{}" line -- known = not variants {}
statLang lang = do
dict <- readFile (gfFile "Dictionary" lang) >>= return . lines