GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-11 12:12:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

added AdAP in Slovenian

Browse Source
This commit is contained in:
krasimir
2016-06-15 11:11:18 +00:00
parent 28c5fa7688
commit c160ad0110
2 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/src/slovenian/AdjectiveSlv.gf
View File

@@ -17,5 +17,9 @@ concrete AdjectiveSlv of Adjective = CatSlv ** open ResSlv in {
} }
} ; } ;
AdAP ada ap = {
s = \\spec,g,c,n => ada.s ++ ap.s ! spec ! g ! c ! n
} ;
AdvAP ap adv = {s = \\spec,g,c,n => ap.s ! spec ! g ! c ! n ++ adv.s} ; AdvAP ap adv = {s = \\spec,g,c,n => ap.s ! spec ! g ! c ! n ++ adv.s} ;
} }

2
lib/src/slovenian/ParadigmsSlv.gf
View File

@@ -287,6 +287,8 @@ oper
mkAdV : Str -> AdV = \s -> lin AdV {s=s} ; mkAdV : Str -> AdV = \s -> lin AdV {s=s} ;
mkAdA : Str -> AdA = \s -> lin AdA {s=s} ;
mkPron : (_,_,_,_,_,_,_ : Str) -> Gender -> Number -> Person -> Pron = mkPron : (_,_,_,_,_,_,_ : Str) -> Gender -> Number -> Person -> Pron =
\nom,acc,gen,dat,loc,instr,poss,g,n,p -> \nom,acc,gen,dat,loc,instr,poss,g,n,p ->
lin Pron {s = table { lin Pron {s = table {