GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-31 10:48:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

make Lang for languages that have complete morphology when running make in lib/src

Browse Source
This commit is contained in:
aarne
2012-09-13 07:20:57 +00:00
parent a373dc8cf8
commit 5049c40831
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/Make.hs
View File

@@ -73,25 +73,25 @@ langsLangAll = langs
langsLang = langs `except` langsIncomplete langsLang = langs `except` langsIncomplete
-- languagues that have notpresent marked -- languagues that have notpresent marked
langsPresent = langsLang `except` ["Jpn","Nep","Pes","Snd","Tha"] langsPresent = langsLang `except` ["Jpn","Nep","Pes","Snd","Tha","Thb"]
-- 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","Lat","Mlt","Tur"] langsIncomplete = ["Amh","Ara","Lat","Mlt","Tur","Thb"]
-- languages for which to compile Try -- languages for which to compile Try
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","Hin","Ina","Jpn","Nep","Pnb","Rus", "Snd"]) langsSymbolic = langsLang `except` (langsIncomplete ++ ["Afr","Hin","Ina","Jpn","Nep","Pnb","Rus", "Snd", "Thb"])
-- 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"]
-- languages for which to run treebank test -- languages for which to run treebank test
langsTest = langsLang `except` ["Ara","Bul","Cat","Hin","Lav","Rus","Spa","Tha"] langsTest = langsLang `except` ["Ara","Bul","Cat","Hin","Lav","Rus","Spa","Tha","Thb"]
-- languages for which to run demo test -- languages for which to run demo test
langsDemo = langsLang `except` ["Ara","Hin","Ina","Lat","Lav","Tha"] langsDemo = langsLang `except` ["Ara","Hin","Ina","Lat","Lav","Tha","Thb"]
-- languages for which to compile parsing grammars -- languages for which to compile parsing grammars
langsParse = langs `only` ["Eng"] langsParse = langs `only` ["Eng"]
@@ -125,7 +125,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 $ if (pres == 1) then langsPresent else langsLang let lans = optl $ if (pres == 1) then langsPresent else langsLangAll
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