forked from GitHub/gf-core
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.
This commit is contained in:
@@ -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 ;
|
||||
|
||||
|
||||
@@ -14,7 +14,7 @@ lin
|
||||
married_Cl x y = mkCl (lin NP x) L.married_A2 (lin NP y) ;
|
||||
|
||||
what_name_QCl x = mkQCl whatSg_IP (mkClSlash (lin NP x) (mkV2 (mkV "叫"))) ;
|
||||
how_old_QCl x = {s = \\_,p,a => x.s ++ (R.word "几岁" | R.word "多大")} ; ----
|
||||
how_old_QCl x = {s = \\_,p,a => x.s ++ R.word "几岁"} | {s = \\_,p,a => x.s ++ R.word "多大"} ; ----
|
||||
---- how_far_QCl x = mkQCl (E.IAdvAdv (ss "far")) (lin NP x) ;
|
||||
|
||||
-- some more things
|
||||
|
||||
Reference in New Issue
Block a user