1
0
forked from GitHub/gf-core

Nepali added to resource synopsis

This commit is contained in:
aarne
2011-06-20 13:13:12 +00:00
parent 7df882ef08
commit b199fcde2f
8 changed files with 823 additions and 468 deletions

View File

@@ -17,7 +17,7 @@ revealedLang = "Eng"
-- all languages shown
apiExxFiles = ["api-examples-" ++ lang ++ ".txt" | lang <- words
"Afr Bul Cat Dan Dut Eng Fin Fre Ger Ita Nor Pes Pnb Pol Ron Rus Spa Swe Urd"]
"Afr Bul Cat Dan Dut Eng Fin Fre Ger Ita Nep Nor Pes Pnb Pol Ron Rus Spa Swe Urd"]
main = do
xx <- getArgs
@@ -247,6 +247,7 @@ paradigmFiles = [
("German", srcPath "/german/ParadigmsGer.gf"),
-- ("Interlingua", srcPath "/interlingua/ParadigmsIna.gf"),
("Italian", srcPath "/italian/ParadigmsIta.gf"),
("Nepali", srcPath "/nepali/ParadigmsNep.gf"),
("Norwegian", srcPath "/norwegian/ParadigmsNor.gf"),
("Polish", srcPath "/polish/ParadigmsPol.gf"),
("Punjabi", srcPath "/punjabi/ParadigmsPnb.gf"),

Binary file not shown.

Before

Width:  |  Height:  |  Size: 172 KiB

After

Width:  |  Height:  |  Size: 166 KiB

File diff suppressed because it is too large Load Diff

View File

@@ -43,7 +43,9 @@ langsCoding = [
(("interlingua","Ina"),""),
(("italian", "Ita"),"Romance"),
(("latin", "Lat"),""),
(("nepali", "Nep"),""),
(("norwegian","Nor"),"Scand"),
(("persian", "Pes"),""),
(("polish", "Pol"),""),
(("punjabi", "Pnb"),""),
(("romanian", "Ron"),""),
@@ -65,6 +67,9 @@ langsLangAll = langs
-- languagues that are almost complete and for which Lang is normally compiled
langsLang = langs `except` langsIncomplete ---- []
-- languagues that have notpresent marked
langsPresent = langsLang `except` ["Nep","Pes"]
-- languages for which Lang can be compiled but which are incomplete
langsIncomplete = ["Amh","Ara","Hin","Lat","Tha","Tur"]
@@ -72,7 +77,7 @@ langsIncomplete = ["Amh","Ara","Hin","Lat","Tha","Tur"]
langsAPI = langsLang `except` langsIncomplete
-- languages for which to compile Symbolic
langsSymbolic = langsLang `except` (langsIncomplete ++ ["Afr","Ina","Pnb","Rus"])
langsSymbolic = langsLang `except` (langsIncomplete ++ ["Afr","Ina","Pes","Pnb","Rus"])
-- languages for which to compile minimal Syntax
langsMinimal = langs `only` ["Ara","Eng","Bul","Rus"]
@@ -109,7 +114,7 @@ make xx = do
let optl ls = maybe ls id $ getOptLangs xx
ifx "lang" $ do
let lans = optl langsLang
let lans = optl $ if pres then langsPresent else langsLang
mapM_ (gfc pres [] . lang) lans
mapM_ (gfc pres presSymbolPath . symbol) lans ---- (optl langsAPI)
copyl lans "*.gfo" dir

View File

@@ -1,3 +1,3 @@
--# -path=.:alltenses:prelude
resource TrySpa = SyntaxSpa, LexiconSpa, ParadigmsSpa - [mkAdv] ;
resource TrySpa = SyntaxSpa, LexiconSpa, ParadigmsSpa - [mkAdv,mkAdN,mkDet,mkOrd,mkQuant] ;