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

normalize record types in overload resolution

Browse Source
This commit is contained in:
aarne
2006-11-18 20:54:10 +00:00
parent de66b20da1
commit af23650f7e
1 changed files with 10 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
resource-1.0/common/Overload.gf
View File

@@ -17,21 +17,22 @@ incomplete resource Overload = open Grammar in {
mod = overload { mod = overload {
mod : A -> N -> CN mod : A -> N -> CN
= \a,n -> AdjCN (PositA a) (UseN n) ; = \a,n -> AdjCN (PositA a) (UseN n) ;
mod : AP -> N -> CN mod : AP -> N -> CN
= \a,n -> AdjCN a (UseN n) ; = \a,n -> AdjCN a (UseN n) ;
mod : AP -> CN -> CN mod : AP -> CN -> CN
= \a,n -> AdjCN a n ; = \a,n -> AdjCN a n ;
mod : AdA -> A -> AP mod : AdA -> A -> AP
= \m,a -> AdAP m (PositA a) ; = \m,a -> AdAP m (PositA a) ;
mod : Quant -> N -> NP mod : Quant -> N -> NP
= \q,n -> DetCN (DetSg (SgQuant q) NoOrd) = \q,n -> DetCN (DetSg (SgQuant q)
(UseN n) ; NoOrd) (UseN n) ;
mod : Quant -> CN -> NP mod : Quant -> CN -> NP
= \q,n -> DetCN (DetSg (SgQuant q) NoOrd) n ; = \q,n -> DetCN (DetSg
(SgQuant q) NoOrd) n ;
mod : Predet -> N -> NP mod : Predet -> N -> NP
= \q,n -> PredetNP q (DetCN (DetPl = \q,n -> PredetNP q (DetCN (DetPl
(PlQuant IndefArt) NoNum NoOrd) (UseN n)) ; (PlQuant IndefArt) NoNum NoOrd) (UseN n)) ;
mod : Num -> N -> NP mod : Num -> N -> NP
= \nu,n -> DetCN (DetPl (PlQuant = \nu,n -> DetCN (DetPl (PlQuant
IndefArt) nu NoOrd) (UseN n) IndefArt) nu NoOrd) (UseN n)