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

test set for resource started

Browse Source
This commit is contained in:
aarne
2008-04-23 20:07:13 +00:00
parent 137a25fd35
commit 29302378c6
19 changed files with 256 additions and 66 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lib/resource/exper/english/NounEng.gf
View File

@@ -99,7 +99,19 @@ concrete NounEng of Noun = CatEng ** open ResEng, Prelude in {
UseN n = n ;
UseN2 n = n ;
UseN3 n = n ;
---b UseN3 n = n ;
Use2N3 f = {
s = \\n,c => f.s ! n ! Nom ;
g = f.g ;
c2 = f.c2
} ;
Use3N3 f = {
s = \\n,c => f.s ! n ! Nom ;
g = f.g ;
c2 = f.c3
} ;
ComplN2 f x = {s = \\n,c => f.s ! n ! Nom ++ f.c2 ++ x.s ! c ; g = f.g} ;
ComplN3 f x = {