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

determiners and extrapositions in Tha fixed

Browse Source
This commit is contained in:
aarne
2011-11-28 22:10:10 +00:00
parent ebcfad5ec3
commit e5de02733c
8 changed files with 62 additions and 44 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
lib/src/thai/NounTha.gf
View File

@@ -18,18 +18,19 @@ concrete NounTha of Noun = CatTha ** open StringsTha, ResTha, Prelude in {
AdvNP np adv = thbind np adv ;
DetQuant quant num = {
s1 = num.s ;
s2 = quant.s ;
s1 = num.s ++ quant.s1 ; --- can there be quant.s1 ??
s2 = quant.s2 ;
hasC = orB num.hasC quant.hasC ;
} ;
DetQuantOrd quant num ord = {
s1 = num.s ;
s2 = quant.s ++ ord.s ;
hasC = orB num.hasC quant.hasC ;
s1 = num.s ++ quant.s1 ; --- can there be quant.s1 ??
s2 = ord.s ++ quant.s2 ;
hasC = True ;
} ;
PossPron p = {
s = khoog_s ++ p.s ;
s1 = khoog_s ++ p.s ;
s2 = [] ;
hasC = False
} ;
@@ -46,8 +47,8 @@ concrete NounTha of Noun = CatTha ** open StringsTha, ResTha, Prelude in {
OrdSuperl a = {s = thbind a.s thii_s sut_s} ;
DefArt = {s = [] ; hasC = False} ;
IndefArt = {s = [] ; hasC = False} ;
DefArt = {s1,s2 = [] ; hasC = False} ;
IndefArt = {s1,s2 = [] ; hasC = False} ;
MassNP cn = cn ;