summaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorhallgren <hallgren@chalmers.se>2015-09-10 12:37:12 +0000
committerhallgren <hallgren@chalmers.se>2015-09-10 12:37:12 +0000
commitfe3dfd7cc4e4cd137a844962583ce0382db29715 (patch)
treeb3a91ea35f5b2ad9a0c3b4c3871542f01a0b76d2 /examples
parentd83316d7c64dfd374f39c002b7e4640e20398c62 (diff)
example/foods/FoodsIce.gf: converted from Latin-1 to UTF-8 encoding
Diffstat (limited to 'examples')
-rw-r--r--examples/foods/FoodsIce.gf21
1 files 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 ;