summaryrefslogtreecommitdiff
path: root/grammars/resource/english/TestEng.gf
diff options
context:
space:
mode:
Diffstat (limited to 'grammars/resource/english/TestEng.gf')
-rw-r--r--grammars/resource/english/TestEng.gf17
1 files changed, 12 insertions, 5 deletions
diff --git a/grammars/resource/english/TestEng.gf b/grammars/resource/english/TestEng.gf
index 57d81d173..7e0391c2a 100644
--- a/grammars/resource/english/TestEng.gf
+++ b/grammars/resource/english/TestEng.gf
@@ -9,20 +9,27 @@ lin
Small = adjDegrReg "small" ;
Old = adjDegrReg "old" ;
Young = adjDegrReg "young" ;
+ American = simpleAdj "American" ;
+ Finnish = simpleAdj "Finnish" ;
+ Married = simpleAdj "married" ** {s2 = "to"} ;
Man = cnHum (mkNoun "man" "men" "man's" "men's") ;
Woman = cnHum (mkNoun "woman" "women" "woman's" "women's") ;
Car = cnNoHum (nounReg "car") ;
House = cnNoHum (nounReg "house") ;
Light = cnNoHum (nounReg "light") ;
Walk = verbNoPart (regVerbP3 "walk") ;
- Run = verbNoPart (regVerbP3 "run") ;
- Say = verbNoPart (regVerbP3 "say") ;
+ Run = verbNoPart (mkVerb "run" "ran" "run") ;
+ Say = verbNoPart (mkVerb "say" "said" "said") ;
Prove = verbNoPart (regVerbP3 "prove") ;
- Send = mkTransVerbDir (regVerbP3 "send") ;
- Love = mkTransVerbDir (regVerbP3 "love") ;
- Wait = mkTransVerb (regVerbP3 "wait") "for" ;
+ Send = mkTransVerbDir (verbNoPart (mkVerb "send" "sent" "sent")) ;
+ Love = mkTransVerbDir (verbNoPart (verbP3e "love")) ;
+ Wait = mkTransVerb (verbNoPart (regVerbP3 "wait")) "for" ;
+ Give = mkDitransVerb (verbNoPart (mkVerb "give" "gave" "given")) [] [] ;
+ Prefer = mkDitransVerb
+ (verbNoPart (mkVerb "prefer" "preferred" "preferred")) [] "to" ;
Mother = funOfReg "mother" Hum ;
Uncle = funOfReg "uncle" Hum ;
+ Connection = cnNoHum (nounReg "connection") ** {s2 = "from" ; s3 = "to"} ;
Always = advPre "always" ;
Well = advPost "well" ;