examples/letter: convert grammar files to UTF-8

1 files changed, 10 insertions, 10 deletions

diff --git a/examples/letter/LetterFin.gf b/examples/letter/LetterFin.gf
index f19dfe65c..6892bfcd4 100644
--- a/examples/letter/LetterFin.gf
+++ b/examples/letter/LetterFin.gf
@@ -5,7 +5,7 @@ concrete LetterFin of Letter = {
 -- This file defines the Finnish syntax of the grammar set 
 -- whose abstract syntax is $letter.Abs.gf$. 
 
-flags lexer=textlit ; unlexer=textlit ;
+flags lexer=textlit ; unlexer=textlit ; coding=utf8;
 
 -- modified from French in 20 min, 15/6/2002
 
@@ -33,10 +33,10 @@ oper
   egosum : Num => Str = 
     table {sg => "olen" ; pl => "olemme"} ;
   egohabeo : Num => Str = 
-    table {sg => "minulla" ++ "on" ; pl => "meillä" ++ "on"} ;
+    table {sg => "minulla" ++ "on" ; pl => "meillä" ++ "on"} ;
   fuisti : Num => Str = 
-    table {sg => "sinut" ++ "on"; pl => "teidät" ++ "on"} ;
-  quePrep = "että" ; ----
+    table {sg => "sinut" ++ "on"; pl => "teidät" ++ "on"} ;
+  quePrep = "että" ; ----
   tuinformare : Num => Str = 
     table {sg => "ilmoittaa" ++ "sinulle" ; pl => "ilmoittaa" ++ "teille"} ;
   
@@ -45,13 +45,13 @@ oper
   avoir : Num => Str = 
     table {sg => "on"; pl => "ovat"} ;
  
-  mes : Num => Str = table {sg => "minun" ; pl => "meidän"} ;
+  mes : Num => Str = table {sg => "minun" ; pl => "meidän"} ;
 
   teamo : Num => Num => Str = table {
     sg => table {sg => "rakastan" ++ "sinua" ; 
-                 pl => "rakastan" ++ "teitä"} ;
+                 pl => "rakastan" ++ "teitä"} ;
     pl => table {sg => "rakastamme" ++ "sinua" ; 
-                 pl => "rakastamme" ++ "teitä"}
+                 pl => "rakastamme" ++ "teitä"}
    } ;
 
   constNG : Str -> Num -> Gen -> SSSrc2 = \str,num,gen -> 
@@ -132,7 +132,7 @@ Regret = {s =
 
 
 President = constNG ["presidentti"] sg masc ;
-Mother    = constNG ["äiti"] sg fem ;
+Mother    = constNG ["äiti"] sg fem ;
 Spouse    = {s = table {
                    sg => table {fem => ["miehesi"] ; masc => ["vaimosi"]} ; 
                    pl => table {fem => ["miehenne"] ; masc => ["vaimonne"]}
@@ -174,8 +174,8 @@ Senior = {s = table {sg => table {g => ["vanhemmaksi tutkijaksi"]} ;
 
 ProjectManager = {s = 
   table {
-    sg => table {_ => ["projektipäälliköksi"]} ;
-    pl => table {_ => ["projektipäälliköiksi"]}
+    sg => table {_ => ["projektipäälliköksi"]} ;
+    pl => table {_ => ["projektipäälliköiksi"]}
         }} ;
 
 }