make thaidroid: a Phrasebook with Thai pronunciation

2011-12-03 12:08:19 +00:00
parent c52f05ed46
commit cf9dd6c9fe
4 changed files with 15 additions and 10 deletions
--- a/examples/phrasebook/WordsTha.gf
+++ b/examples/phrasebook/WordsTha.gf
@@ -231,6 +231,7 @@ concrete WordsTha of Words = SentencesTha **
 -- auxiliaries

  oper
+--    thpron = R.thpron ;

    mkNat : Str -> NPNationality = \nat -> 
      mkNPNationality (mkNP (mkCN (mkA nat) L.language_N)) (mkNP (mkCN (mkA nat) L.country_N)) (mkA nat) ;