forked from GitHub/gf-core
Nepali added to resource synopsis
This commit is contained in:
@@ -17,7 +17,7 @@ revealedLang = "Eng"
|
|||||||
|
|
||||||
-- all languages shown
|
-- all languages shown
|
||||||
apiExxFiles = ["api-examples-" ++ lang ++ ".txt" | lang <- words
|
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
|
main = do
|
||||||
xx <- getArgs
|
xx <- getArgs
|
||||||
@@ -247,6 +247,7 @@ paradigmFiles = [
|
|||||||
("German", srcPath "/german/ParadigmsGer.gf"),
|
("German", srcPath "/german/ParadigmsGer.gf"),
|
||||||
-- ("Interlingua", srcPath "/interlingua/ParadigmsIna.gf"),
|
-- ("Interlingua", srcPath "/interlingua/ParadigmsIna.gf"),
|
||||||
("Italian", srcPath "/italian/ParadigmsIta.gf"),
|
("Italian", srcPath "/italian/ParadigmsIta.gf"),
|
||||||
|
("Nepali", srcPath "/nepali/ParadigmsNep.gf"),
|
||||||
("Norwegian", srcPath "/norwegian/ParadigmsNor.gf"),
|
("Norwegian", srcPath "/norwegian/ParadigmsNor.gf"),
|
||||||
("Polish", srcPath "/polish/ParadigmsPol.gf"),
|
("Polish", srcPath "/polish/ParadigmsPol.gf"),
|
||||||
("Punjabi", srcPath "/punjabi/ParadigmsPnb.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
@@ -43,7 +43,9 @@ langsCoding = [
|
|||||||
(("interlingua","Ina"),""),
|
(("interlingua","Ina"),""),
|
||||||
(("italian", "Ita"),"Romance"),
|
(("italian", "Ita"),"Romance"),
|
||||||
(("latin", "Lat"),""),
|
(("latin", "Lat"),""),
|
||||||
|
(("nepali", "Nep"),""),
|
||||||
(("norwegian","Nor"),"Scand"),
|
(("norwegian","Nor"),"Scand"),
|
||||||
|
(("persian", "Pes"),""),
|
||||||
(("polish", "Pol"),""),
|
(("polish", "Pol"),""),
|
||||||
(("punjabi", "Pnb"),""),
|
(("punjabi", "Pnb"),""),
|
||||||
(("romanian", "Ron"),""),
|
(("romanian", "Ron"),""),
|
||||||
@@ -65,6 +67,9 @@ langsLangAll = langs
|
|||||||
-- languagues that are almost complete and for which Lang is normally compiled
|
-- languagues that are almost complete and for which Lang is normally compiled
|
||||||
langsLang = langs `except` langsIncomplete ---- []
|
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
|
-- languages for which Lang can be compiled but which are incomplete
|
||||||
langsIncomplete = ["Amh","Ara","Hin","Lat","Tha","Tur"]
|
langsIncomplete = ["Amh","Ara","Hin","Lat","Tha","Tur"]
|
||||||
|
|
||||||
@@ -72,7 +77,7 @@ langsIncomplete = ["Amh","Ara","Hin","Lat","Tha","Tur"]
|
|||||||
langsAPI = langsLang `except` langsIncomplete
|
langsAPI = langsLang `except` langsIncomplete
|
||||||
|
|
||||||
-- languages for which to compile Symbolic
|
-- 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
|
-- languages for which to compile minimal Syntax
|
||||||
langsMinimal = langs `only` ["Ara","Eng","Bul","Rus"]
|
langsMinimal = langs `only` ["Ara","Eng","Bul","Rus"]
|
||||||
@@ -109,7 +114,7 @@ make xx = do
|
|||||||
let optl ls = maybe ls id $ getOptLangs xx
|
let optl ls = maybe ls id $ getOptLangs xx
|
||||||
|
|
||||||
ifx "lang" $ do
|
ifx "lang" $ do
|
||||||
let lans = optl langsLang
|
let lans = optl $ if pres then langsPresent else langsLang
|
||||||
mapM_ (gfc pres [] . lang) lans
|
mapM_ (gfc pres [] . lang) lans
|
||||||
mapM_ (gfc pres presSymbolPath . symbol) lans ---- (optl langsAPI)
|
mapM_ (gfc pres presSymbolPath . symbol) lans ---- (optl langsAPI)
|
||||||
copyl lans "*.gfo" dir
|
copyl lans "*.gfo" dir
|
||||||
|
|||||||
@@ -1,3 +1,3 @@
|
|||||||
--# -path=.:alltenses:prelude
|
--# -path=.:alltenses:prelude
|
||||||
|
|
||||||
resource TrySpa = SyntaxSpa, LexiconSpa, ParadigmsSpa - [mkAdv] ;
|
resource TrySpa = SyntaxSpa, LexiconSpa, ParadigmsSpa - [mkAdv,mkAdN,mkDet,mkOrd,mkQuant] ;
|
||||||
|
|||||||
Reference in New Issue
Block a user