diff options
| author | hallgren <hallgren@chalmers.se> | 2015-07-28 10:58:00 +0000 |
|---|---|---|
| committer | hallgren <hallgren@chalmers.se> | 2015-07-28 10:58:00 +0000 |
| commit | 8c1c29b82921f6a65679c33610f9bbc4db2d7abe (patch) | |
| tree | cf0fcf0470edfcc3e59566fbf2bb8eeded65c9cc /examples | |
| parent | a1a602c6810b572eec99a66112337ee6d2c2d5d1 (diff) | |
FoodsTur.gf: use Predef.BIND instead of "&+"
...for better results when used with the C run-time system.
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/foods/FoodsTur.gf | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/foods/FoodsTur.gf b/examples/foods/FoodsTur.gf index 9d6cd0350..9347a6bf7 100644 --- a/examples/foods/FoodsTur.gf +++ b/examples/foods/FoodsTur.gf @@ -26,7 +26,7 @@ concrete FoodsTur of Foods = open Predef in { -- Reason for excluding plural form of copula: In Turkish if subject is not a human being, -- then singular form of copula is used regardless of the number of subject. Since all -- possible subjects are non human, copula do not need to have plural form. - Pred item quality = {s = item.s ++ quality.s ++ "&+" ++ copula ! quality.softness ! quality.h} ;--! item.n} ; + Pred item quality = {s = item.s ++ quality.s ++ BIND ++ copula ! quality.softness ! quality.h} ;--! item.n} ; Mod quality kind = {s = case quality.c of { Nom => \\t,n => quality.s ++ kind.s ! t ! n ; Gen => \\t,n => quality.s ++ kind.s ! Gen ! n |