diff options
| author | aarne <aarne@chalmers.se> | 2011-12-05 15:25:06 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2011-12-05 15:25:06 +0000 |
| commit | 5f4ac0480492a3ea144cc022cabc97462a267b4e (patch) | |
| tree | 1926d45f086d68447b2f43bc2346f0a29e0c4dfe /examples/phrasebook | |
| parent | 8f05c404c588b98161bee798e8390f53e3aa37e4 (diff) | |
diverse RGL and Phrasebook fixes, and a corrected Synopsis
Diffstat (limited to 'examples/phrasebook')
| -rw-r--r-- | examples/phrasebook/SentencesTha.gf | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/examples/phrasebook/SentencesTha.gf b/examples/phrasebook/SentencesTha.gf index 55662e1df..2e2aebe09 100644 --- a/examples/phrasebook/SentencesTha.gf +++ b/examples/phrasebook/SentencesTha.gf @@ -1,7 +1,7 @@ concrete SentencesTha of Sentences = NumeralTha ** SentencesI - [ PGreetingMale, PGreetingFemale, GObjectPlease, - ACitizen, WherePlace, WherePerson + ACitizen ] with (Syntax = SyntaxTha), (Symbolic = SymbolicTha), @@ -17,11 +17,6 @@ lin ACitizen p n = mkCl p.name (mkVP (mkCN n (P.personN R.khon_s))) ; - WherePlace place = mkQS (mkQCl where_IAdv (mkCl place.name yuu_V)) ; - WherePerson person = mkQS (mkQCl where_IAdv (mkCl person.name yuu_V)) ; - oper - yuu_V : V = R.regV "อยู่" ; - thpron = R.thpron ; } |