forked from GitHub/gf-core
Add FoodsFin to testsuite (fails)
This commit is contained in:
@@ -2,6 +2,7 @@ Foods: Pred (That Wine) Delicious
|
|||||||
FoodsBul: онова вино е превъзходно
|
FoodsBul: онова вино е превъзходно
|
||||||
FoodsChi: 那 瓶 酒 是 美 味 的
|
FoodsChi: 那 瓶 酒 是 美 味 的
|
||||||
FoodsEng: that wine is delicious
|
FoodsEng: that wine is delicious
|
||||||
|
FoodsFin: tuo viini on herkullinen
|
||||||
FoodsHeb: היין ההוא טעים
|
FoodsHeb: היין ההוא טעים
|
||||||
FoodsSwe: det där vinet är läckert
|
FoodsSwe: det där vinet är läckert
|
||||||
|
|
||||||
@@ -9,6 +10,7 @@ Foods: Pred (This Pizza) (Very Boring)
|
|||||||
FoodsBul: тази пица е много еднообразна
|
FoodsBul: тази пица е много еднообразна
|
||||||
FoodsChi: 这 张 比 萨 饼 是 非 常 难 吃 的
|
FoodsChi: 这 张 比 萨 饼 是 非 常 难 吃 的
|
||||||
FoodsEng: this pizza is very boring
|
FoodsEng: this pizza is very boring
|
||||||
|
FoodsFin: tämä pizza on erittäin tylsä
|
||||||
FoodsHeb: הפיצה הזאת מאוד משעממת
|
FoodsHeb: הפיצה הזאת מאוד משעממת
|
||||||
FoodsSwe: den här pizzan är mycket tråkig
|
FoodsSwe: den här pizzan är mycket tråkig
|
||||||
|
|
||||||
@@ -16,6 +18,7 @@ Foods: Pred (This Cheese) Fresh
|
|||||||
FoodsBul: това сирене е свежо
|
FoodsBul: това сирене е свежо
|
||||||
FoodsChi: 这 块 奶 酪 是 新 鲜 的
|
FoodsChi: 这 块 奶 酪 是 新 鲜 的
|
||||||
FoodsEng: this cheese is fresh
|
FoodsEng: this cheese is fresh
|
||||||
|
FoodsFin: tämä juusto on tuore
|
||||||
FoodsHeb: הגבינה הזאת טריה
|
FoodsHeb: הגבינה הזאת טריה
|
||||||
FoodsSwe: den här osten är färsk
|
FoodsSwe: den här osten är färsk
|
||||||
|
|
||||||
@@ -23,6 +26,7 @@ Foods: Pred (Those Fish) Warm
|
|||||||
FoodsBul: онези риби са горещи
|
FoodsBul: онези риби са горещи
|
||||||
FoodsChi: 那 几 条 鱼 是 温 热 的
|
FoodsChi: 那 几 条 鱼 是 温 热 的
|
||||||
FoodsEng: those fish are warm
|
FoodsEng: those fish are warm
|
||||||
|
FoodsFin: nuo kalat ovat lämpimiä
|
||||||
FoodsHeb: הדגים ההם חמים
|
FoodsHeb: הדגים ההם חמים
|
||||||
FoodsSwe: de där fiskarna är varma
|
FoodsSwe: de där fiskarna är varma
|
||||||
|
|
||||||
@@ -30,6 +34,7 @@ Foods: Pred (That (Mod Boring (Mod Italian Pizza))) Expensive
|
|||||||
FoodsBul: онази еднообразна италианска пица е скъпа
|
FoodsBul: онази еднообразна италианска пица е скъпа
|
||||||
FoodsChi: 那 张 又 难 吃 又 意 大 利 式 的 比 萨 饼 是 昂 贵 的
|
FoodsChi: 那 张 又 难 吃 又 意 大 利 式 的 比 萨 饼 是 昂 贵 的
|
||||||
FoodsEng: that boring Italian pizza is expensive
|
FoodsEng: that boring Italian pizza is expensive
|
||||||
|
FoodsFin: tuo tylsä italialainen pizza on kallis
|
||||||
FoodsHeb: הפיצה האיטלקית המשעממת ההיא יקרה
|
FoodsHeb: הפיצה האיטלקית המשעממת ההיא יקרה
|
||||||
FoodsSwe: den där tråkiga italienska pizzan är dyr
|
FoodsSwe: den där tråkiga italienska pizzan är dyr
|
||||||
|
|
||||||
|
|||||||
6
testsuite/lpgf/FoodsFin.gf
Normal file
6
testsuite/lpgf/FoodsFin.gf
Normal file
@@ -0,0 +1,6 @@
|
|||||||
|
|
||||||
|
-- (c) 2009 Aarne Ranta under LGPL
|
||||||
|
|
||||||
|
concrete FoodsFin of Foods = FoodsI with
|
||||||
|
(Syntax = SyntaxFin),
|
||||||
|
(LexFoods = LexFoodsFin) ;
|
||||||
21
testsuite/lpgf/LexFoodsFin.gf
Normal file
21
testsuite/lpgf/LexFoodsFin.gf
Normal file
@@ -0,0 +1,21 @@
|
|||||||
|
-- (c) 2009 Aarne Ranta under LGPL
|
||||||
|
--# -coding=latin1
|
||||||
|
|
||||||
|
instance LexFoodsFin of LexFoods =
|
||||||
|
open SyntaxFin, ParadigmsFin in {
|
||||||
|
oper
|
||||||
|
wine_N = mkN "viini" ;
|
||||||
|
pizza_N = mkN "pizza" ;
|
||||||
|
cheese_N = mkN "juusto" ;
|
||||||
|
fish_N = mkN "kala" ;
|
||||||
|
fresh_A = mkA "tuore" ;
|
||||||
|
warm_A = mkA
|
||||||
|
(mkN "lämmin" "lämpimän" "lämmintä" "lämpimänä" "lämpimään"
|
||||||
|
"lämpiminä" "lämpimiä" "lämpimien" "lämpimissä" "lämpimiin"
|
||||||
|
)
|
||||||
|
"lämpimämpi" "lämpimin" ;
|
||||||
|
italian_A = mkA "italialainen" ;
|
||||||
|
expensive_A = mkA "kallis" ;
|
||||||
|
delicious_A = mkA "herkullinen" ;
|
||||||
|
boring_A = mkA "tylsä" ;
|
||||||
|
}
|
||||||
Reference in New Issue
Block a user