diff options
| author | aarne <aarne@chalmers.se> | 2014-08-24 14:28:48 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2014-08-24 14:28:48 +0000 |
| commit | 9253d54b7e4d6f496124fcc1c3e6f852213e7d84 (patch) | |
| tree | 054fd315255ef21bfb1a92fee6e5ea0a69721bf6 /examples | |
| parent | a39647d7716513d30d8bcfb5579b4e04e91f056b (diff) | |
made the "how old" construction in Chinese more efficient by moving variants to the top level; the resulting rule is the same. This kind of inefficiencies are best found if you compile with the -v option and check for constructors creating unexpectedly many PGF rules.
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/phrasebook/WordsChi.gf | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/phrasebook/WordsChi.gf b/examples/phrasebook/WordsChi.gf index 188985818..5b9baeb73 100644 --- a/examples/phrasebook/WordsChi.gf +++ b/examples/phrasebook/WordsChi.gf @@ -158,7 +158,7 @@ AWantGo p place = mkCl p.name want_VV (mkVP L.go_V place.name) ; -- miscellaneous QWhatName p = lin QS {s = \\_ => p.name.s ++ R.word "贵姓"} ; --- - QWhatAge p = lin QS {s = \\_ => p.name.s ++ (R.word "几岁" | R.word "多大")} ; --- + QWhatAge p = lin QS {s = \\_ => p.name.s ++ R.word "几岁"} | lin QS {s = \\_ => p.name.s ++ R.word "多大"} ; --- HowMuchCost item = lin QS {s = \\_ => item.s ++ R.word "是多少钱"} ; ItCost item price = mkCl item (mkV2 "是") price ; |
