From 57653634da130c8faac6f2eb45091079ad57740e Mon Sep 17 00:00:00 2001 From: "kr.angelov" Date: Fri, 19 Dec 2014 15:33:54 +0000 Subject: [PATCH] in English addGenitiveS should use the BIND token --- src/english/SymbolEng.gf | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/english/SymbolEng.gf b/src/english/SymbolEng.gf index 2fefea0c2..52dfa684b 100644 --- a/src/english/SymbolEng.gf +++ b/src/english/SymbolEng.gf @@ -39,6 +39,6 @@ oper -- Note: this results in a space before 's, but there's -- not mauch we can do about that. addGenitiveS : Str -> Case => Str = \s -> - table { Gen => s ++ "'s"; _ => s } ; + table { Gen => s ++ BIND ++ "'s"; _ => s } ; }