updated documentation to Chinese; not yet in synopsis though

This commit is contained in:
aarne
2012-10-15 08:28:00 +00:00
parent 754949f5cc
commit a8965d587b
4 changed files with 30 additions and 3 deletions

View File

@@ -38,7 +38,7 @@ concrete VerbChi of Verb = CatChi ** open ResChi, Prelude in {
(insertObj (mkNP (infVP vp)) (predV v)) ** {c2 = vp.c2} ;
AdvVP vp adv = case adv.advType of {
ATManner => insertObj adv vp ; -- he sleeps well
ATManner => insertObj (ss (deVAdv_s ++ adv.s)) vp ; -- he sleeps well
_ => insertAdv (ss (zai_V.s ++ adv.s)) vp -- he sleeps in the house / today
} ;