diff --git a/lib/src/Make.hs b/lib/src/Make.hs index 08a80a72d..48cf40063 100644 --- a/lib/src/Make.hs +++ b/lib/src/Make.hs @@ -43,6 +43,7 @@ langsCoding = [ (("interlingua","Ina"),""), (("italian", "Ita"),"Romance"), (("latin", "Lat"),""), + (("latvian", "Lav"),""), (("nepali", "Nep"),""), (("norwegian","Nor"),"Scand"), (("persian", "Pes"),""), @@ -68,7 +69,7 @@ langsLangAll = langs langsLang = langs `except` langsIncomplete ---- [] -- languagues that have notpresent marked -langsPresent = langsLang `except` ["Nep","Pes","Tha"] +langsPresent = langsLang `except` ["Lav","Nep","Pes","Tha"] -- languages for which Lang can be compiled but which are incomplete langsIncomplete = ["Amh","Ara","Hin","Lat","Tha","Tur"] @@ -77,7 +78,7 @@ langsIncomplete = ["Amh","Ara","Hin","Lat","Tha","Tur"] langsAPI = langsLang `except` langsIncomplete -- languages for which to compile Symbolic -langsSymbolic = langsLang `except` (langsIncomplete ++ ["Afr","Ina","Nep","Pes","Pnb","Rus","Tha"]) +langsSymbolic = langsLang `except` (langsIncomplete ++ ["Afr","Ina","Lav","Nep","Pes","Pnb","Rus","Tha"]) -- languages for which to compile minimal Syntax langsMinimal = langs `only` ["Ara","Eng","Bul","Rus"] diff --git a/lib/src/api/CombinatorsLav.gf b/lib/src/api/CombinatorsLav.gf new file mode 100644 index 000000000..c7ba4b194 --- /dev/null +++ b/lib/src/api/CombinatorsLav.gf @@ -0,0 +1,6 @@ +--# -path=.:alltenses:prelude + +resource CombinatorsLav = Combinators with + (Cat = CatLav), + (Structural = StructuralLav), + (Constructors = ConstructorsLav) ; diff --git a/lib/src/api/ConstructorsLav.gf b/lib/src/api/ConstructorsLav.gf new file mode 100644 index 000000000..fad2aaf3c --- /dev/null +++ b/lib/src/api/ConstructorsLav.gf @@ -0,0 +1,3 @@ +--# -path=.:alltenses:prelude + +resource ConstructorsLav = Constructors with (Grammar = GrammarLav) ; diff --git a/lib/src/api/SyntaxLav.gf b/lib/src/api/SyntaxLav.gf new file mode 100644 index 000000000..e170a4730 --- /dev/null +++ b/lib/src/api/SyntaxLav.gf @@ -0,0 +1,5 @@ +--# -path=.:alltenses:prelude + +instance SyntaxLav of Syntax = + ConstructorsLav, CatLav, StructuralLav, CombinatorsLav ; + diff --git a/lib/src/api/TryLav.gf b/lib/src/api/TryLav.gf new file mode 100644 index 000000000..7689546d3 --- /dev/null +++ b/lib/src/api/TryLav.gf @@ -0,0 +1,22 @@ +--# -path=.:alltenses:prelude + +resource TryLav = SyntaxLav-[mkAdN], LexiconLav, ParadigmsLav - [mkAdv,mkAdN,mkOrd,mkQuant] ** + open (P = ParadigmsLav) in { + +oper + + mkAdv = overload SyntaxLav { + mkAdv : Str -> Adv = P.mkAdv ; + } ; + + mkAdN = overload { + mkAdN : CAdv -> AdN = SyntaxLav.mkAdN ; + mkAdN : Str -> AdN = P.mkAdN ; + } ; + + mkOrd = overload SyntaxLav { + mkOrd : Str -> Ord = P.mkOrd ; + } ; + + +}