From fe3dfd7cc4e4cd137a844962583ce0382db29715 Mon Sep 17 00:00:00 2001
From: hallgren <hallgren@chalmers.se>
Date: Thu, 10 Sep 2015 12:37:12 +0000
Subject: [PATCH] example/foods/FoodsIce.gf: converted from Latin-1 to UTF-8
 encoding

---
 examples/foods/FoodsIce.gf | 21 ++++++++++-----------
 1 file changed, 10 insertions(+), 11 deletions(-)

diff --git a/examples/foods/FoodsIce.gf b/examples/foods/FoodsIce.gf
index 14c2c903a..61b1a95b2 100644
--- a/examples/foods/FoodsIce.gf
+++ b/examples/foods/FoodsIce.gf
@@ -1,10 +1,9 @@
---# -coding=latin1
 
 -- (c) 2009 Martha Dis Brandt under LGPL
 
 concrete FoodsIce of Foods = open Prelude in {
 
---flags coding=utf8;
+  flags coding=utf8;
 
   lincat
     Comment = SS ; 
@@ -14,22 +13,22 @@ concrete FoodsIce of Foods = open Prelude in {
 
   lin
     Pred item quality =  ss (item.s ++ copula item.n ++ quality.s ! item.g ! item.n ! Ind) ;
-         This, That  = det Sg "þessi"   "þessi"  "þetta" ;
-         These, Those = det Pl "þessir" "þessar" "þessi" ;
+         This, That  = det Sg "þessi"   "þessi"  "þetta" ;
+         These, Those = det Pl "þessir" "þessar" "þessi" ;
     Mod quality kind = { s = \\n => quality.s ! kind.g ! n ! Def ++ kind.s ! n ; g = kind.g } ;
-         Wine = noun "vín" "vín" Neutr ;
+         Wine = noun "vín" "vín" Neutr ;
          Cheese = noun "ostur" "ostar" Masc ; 
          Fish = noun "fiskur" "fiskar" Masc ; 
          -- the word "pizza" is more commonly used in Iceland, but "flatbaka" is the Icelandic word for it
-         Pizza = noun "flatbaka" "flatbökur" Fem ;
-    Very qual = {s = \\g,n,defOrInd => "mjög" ++ qual.s ! g ! n ! defOrInd } ;
+         Pizza = noun "flatbaka" "flatbökur" Fem ;
+    Very qual = {s = \\g,n,defOrInd => "mjög" ++ qual.s ! g ! n ! defOrInd } ;
          Fresh = regAdj "ferskur" ;
          Warm = regAdj "heitur" ;
-         Boring = regAdj "leiðinlegur" ;
+         Boring = regAdj "leiðinlegur" ;
          -- the order of the given adj forms is: mSg fSg nSg mPl fPl nPl mSgDef f/nSgDef _PlDef
-         Italian = adjective "ítalskur" "ítölsk" "ítalskt" "ítalskir" "ítalskar" "ítölsk" "ítalski" "ítalska" "ítalsku" ;
-         Expensive = adjective "dýr" "dýr" "dýrt" "dýrir" "dýrar" "dýr" "dýri" "dýra" "dýru" ; 
-         Delicious = adjective "ljúffengur" "ljúffeng" "ljúffengt" "ljúffengir" "ljúffengar" "ljúffeng" "ljúffengi" "ljúffenga" "ljúffengu" ;
+         Italian = adjective "ítalskur" "ítölsk" "ítalskt" "ítalskir" "ítalskar" "ítölsk" "ítalski" "ítalska" "ítalsku" ;
+         Expensive = adjective "dýr" "dýr" "dýrt" "dýrir" "dýrar" "dýr" "dýri" "dýra" "dýru" ; 
+         Delicious = adjective "ljúffengur" "ljúffeng" "ljúffengt" "ljúffengir" "ljúffengar" "ljúffeng" "ljúffengi" "ljúffenga" "ljúffengu" ;
 
   param
     Number = Sg | Pl ;