diff options
| author | aarne <aarne@cs.chalmers.se> | 2007-09-06 13:06:22 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2007-09-06 13:06:22 +0000 |
| commit | e68a4c82a7188da9cb09256abf122c9d177770d8 (patch) | |
| tree | 6874cb5b65c070682a4446a6e20f8aab310d71ea /examples/tutorial/resource-foods/ExtFoodsI.gf | |
| parent | 10f621045a53c3a2b75195f355e362537ac6f08b (diff) | |
comented ExtFoods
Diffstat (limited to 'examples/tutorial/resource-foods/ExtFoodsI.gf')
| -rw-r--r-- | examples/tutorial/resource-foods/ExtFoodsI.gf | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/examples/tutorial/resource-foods/ExtFoodsI.gf b/examples/tutorial/resource-foods/ExtFoodsI.gf index 57b8c1cf1..def336e28 100644 --- a/examples/tutorial/resource-foods/ExtFoodsI.gf +++ b/examples/tutorial/resource-foods/ExtFoodsI.gf @@ -6,7 +6,7 @@ incomplete concrete ExtFoodsI of ExtFoods = FoodsI ** open Syntax, LexFoods in { Move = Text ; Verb = V2 ; Guest = NP ; - GuestKind = N ; + GuestKind = CN ; lin MAssert p = mkText (mkS p) ; MDeny p = mkText (mkS negativePol p) ; @@ -43,7 +43,7 @@ incomplete concrete ExtFoodsI of ExtFoods = FoodsI ** open Syntax, LexFoods in { Eat = eat_V2 ; Drink = drink_V2 ; Pay = pay_V2 ; - Lady = lady_N ; - Gentleman = gentleman_N ; + Lady = mkCN lady_N ; + Gentleman = mkCN gentleman_N ; } |