diff options
| author | ramona.enache <ramona.enache@chalmers.se> | 2010-05-28 12:15:28 +0000 |
|---|---|---|
| committer | ramona.enache <ramona.enache@chalmers.se> | 2010-05-28 12:15:28 +0000 |
| commit | 8f9eb4f7f32560803d690be2b75e9dcc6cb08502 (patch) | |
| tree | 595441a5b991f7576d221025515b6b37469692e8 /examples/phrasebook/WordsEng.gf | |
| parent | 2d44390bbf681b060574bbcfd95811a4459935db (diff) | |
added inherent number to places, fixed places in French
Diffstat (limited to 'examples/phrasebook/WordsEng.gf')
| -rw-r--r-- | examples/phrasebook/WordsEng.gf | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/phrasebook/WordsEng.gf b/examples/phrasebook/WordsEng.gf index 10d201b06..38db65f62 100644 --- a/examples/phrasebook/WordsEng.gf +++ b/examples/phrasebook/WordsEng.gf @@ -233,10 +233,10 @@ concrete WordsEng of Words = SentencesEng ** mkNPDay day (SyntaxEng.mkAdv on_Prep day) (SyntaxEng.mkAdv on_Prep (mkNP a_Quant plNum (mkCN (mkN d)))) ; - mkCompoundPlace : Str -> Str -> Str -> {name : CN ; at : Prep ; to : Prep} = \comp, p, i -> + mkCompoundPlace : Str -> Str -> Str -> {name : CN ; at : Prep ; to : Prep; isPl : Bool} = \comp, p, i -> mkCNPlace (mkCN (P.mkN comp (mkN p))) (P.mkPrep i) to_Prep ; - mkPlace : Str -> Str -> {name : CN ; at : Prep ; to : Prep} = \p,i -> + mkPlace : Str -> Str -> {name : CN ; at : Prep ; to : Prep; isPl : Bool} = \p,i -> mkCNPlace (mkCN (mkN p)) (P.mkPrep i) to_Prep ; open_Adv = P.mkAdv "open" ; |