msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

Latvian API compiles! Does it? :)

Browse Source
This commit is contained in:
normundsg
2011-12-19 14:11:46 +00:00
parent 1f7be86dd2
commit cd671c58a9
4 changed files with 14 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lib/src/latvian/SentenceLav.gf
View File

@@ -1,7 +1,6 @@
--# -path=.:../abstract:../common:../prelude
concrete SentenceLav of Sentence = CatLav ** open
Prelude,
ResLav,
VerbLav
in {
@@ -52,7 +51,7 @@ lin
AdvS a s = { s = NON_EXISTENT } ;
oper
mkClause : NP -> VP -> Cl = \np,vp -> lin Cl {
mkClause : NP -> CatLav.VP -> Cl = \np,vp -> lin Cl {
s = \\mood,pol =>
case mood of { -- Subject
-- FIXME: jāčeko valences, reizēm arī īstenības izteiksmē - 'man patīk kaut kas'
@@ -66,7 +65,7 @@ oper
-- FIXME: quick&dirty - lai kompilētos pret RGL API
-- Eng: PredSCVP sc vp = mkClause sc.s (agrP3 Sg) vp
-- Ar SC nav iespējams neko saskaņot (sk. Cat.gf un Common.gf)
mkClauseSC : SC -> VP -> Cl = \sc,vp -> lin Cl {
mkClauseSC : SC -> CatLav.VP -> Cl = \sc,vp -> lin Cl {
s = \\mood,pol => sc.s ++ buildVerb vp.v mood pol (AgP3 Sg Masc) ++ vp.s2 ! (AgP3 Sg Masc)
} ;