From 9f4660832d9c816b081fabf192fcebe12cb250fb Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 16 Nov 2011 10:51:06 +0000 Subject: changed FoodsTha to FoodsThai (to mark it as unstable) --- contrib/summerschool/foods/FoodsTha.gf | 34 --------------------------------- contrib/summerschool/foods/FoodsThai.gf | 34 +++++++++++++++++++++++++++++++++ 2 files changed, 34 insertions(+), 34 deletions(-) delete mode 100644 contrib/summerschool/foods/FoodsTha.gf create mode 100644 contrib/summerschool/foods/FoodsThai.gf diff --git a/contrib/summerschool/foods/FoodsTha.gf b/contrib/summerschool/foods/FoodsTha.gf deleted file mode 100644 index ccc342e18..000000000 --- a/contrib/summerschool/foods/FoodsTha.gf +++ /dev/null @@ -1,34 +0,0 @@ ---# -path=.:alltenses - -concrete FoodsTha of Foods = open SyntaxTha, LexiconTha, - ParadigmsTha, (R=ResTha) in { - - flags coding = utf8 ; - - lincat - Comment = Utt ; - Item = NP ; - Kind = CN ; - Quality = AP ; - - lin - Pred item quality = mkUtt (mkCl item quality) ; - This kind = mkNP this_Det kind ; - That kind = mkNP that_Det kind ; - These kind = mkNP these_Det kind ; - Those kind = mkNP those_Det kind ; - Mod quality kind = mkCN quality kind ; - Very quality = mkAP very_AdA quality ; - Wine = mkCN (mkN (R.thbind "เหล้าอ" "งุ่น") "ขวด") ; - Pizza = mkCN (mkN (R.thbind "พิซ" "ซา") "ถาด") ; - Cheese = mkCN (mkN (R.thbind "เนย" "แข็ง") "ก้อน") ; - Fish = mkCN fish_N ; - Fresh = mkAP (mkA "สด") ; - Warm = mkAP warm_A ; - Italian = mkAP (mkA " อิตาลี") ; - Expensive = mkAP (mkA "แพง") ; - Delicious = mkAP (mkA "อร่อย") ; - Boring = mkAP (mkA (R.thbind "น่า" "เบิ่อ")) ; - -} - diff --git a/contrib/summerschool/foods/FoodsThai.gf b/contrib/summerschool/foods/FoodsThai.gf new file mode 100644 index 000000000..130968e43 --- /dev/null +++ b/contrib/summerschool/foods/FoodsThai.gf @@ -0,0 +1,34 @@ +--# -path=.:alltenses + +concrete FoodsThai of Foods = open SyntaxTha, LexiconTha, + ParadigmsTha, (R=ResTha) in { + + flags coding = utf8 ; + + lincat + Comment = Utt ; + Item = NP ; + Kind = CN ; + Quality = AP ; + + lin + Pred item quality = mkUtt (mkCl item quality) ; + This kind = mkNP this_Det kind ; + That kind = mkNP that_Det kind ; + These kind = mkNP these_Det kind ; + Those kind = mkNP those_Det kind ; + Mod quality kind = mkCN quality kind ; + Very quality = mkAP very_AdA quality ; + Wine = mkCN (mkN (R.thbind "เหล้าอ" "งุ่น") "ขวด") ; + Pizza = mkCN (mkN (R.thbind "พิซ" "ซา") "ถาด") ; + Cheese = mkCN (mkN (R.thbind "เนย" "แข็ง") "ก้อน") ; + Fish = mkCN fish_N ; + Fresh = mkAP (mkA "สด") ; + Warm = mkAP warm_A ; + Italian = mkAP (mkA " อิตาลี") ; + Expensive = mkAP (mkA "แพง") ; + Delicious = mkAP (mkA "อร่อย") ; + Boring = mkAP (mkA (R.thbind "น่า" "เบิ่อ")) ; + +} + -- cgit v1.2.3