From 2049d0379b47c0f65d04563d3c7aca65cdb21674 Mon Sep 17 00:00:00 2001 From: Julia Jansson Date: Tue, 21 Apr 2020 20:17:07 +0200 Subject: [PATCH 1/2] test cases --- src/hungarian/unittest/determiners.gftest | 4 ++-- src/hungarian/unittest/inflection/tó.gftest | 10 +++++----- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/src/hungarian/unittest/determiners.gftest b/src/hungarian/unittest/determiners.gftest index 910a21448..8bb2c331f 100644 --- a/src/hungarian/unittest/determiners.gftest +++ b/src/hungarian/unittest/determiners.gftest @@ -32,8 +32,8 @@ LangHun: én látok néhányat Lang: PhrUtt NoPConj (UttS (UseCl (TTAnt TPres ASimul) PPos (PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN few_Det (AdjCN (PositA red_A) (UseN apple_N))))))) NoVoc LangEng: I see few red apples -LangHun: én látom kevés piros almát +LangHun: én látok kevés piros almát Lang: PhrUtt NoPConj (UttS (UseCl (TTAnt TPres ASimul) PPos (PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN many_Det (AdjCN (PositA red_A) (UseN apple_N))))))) NoVoc LangEng: I see many red apples -LangHun: én látom sok piros almát +LangHun: én látok sok piros almát diff --git a/src/hungarian/unittest/inflection/tó.gftest b/src/hungarian/unittest/inflection/tó.gftest index f75158520..9ac095071 100644 --- a/src/hungarian/unittest/inflection/tó.gftest +++ b/src/hungarian/unittest/inflection/tó.gftest @@ -2,22 +2,22 @@ Lang: MassNP (UseN lake_N) LangHun: tó Lang: PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN (DetQuant IndefArt NumSg) (UseN lake_N))) -LangHun: én látok egy tovat +LangHun: én látok egy tavat Lang: PrepNP on_Prep (DetCN (DetQuant IndefArt NumSg) (UseN lake_N)) -LangHun: egy tovon +LangHun: egy tavon Lang: DetCN (DetQuant IndefArt NumPl) (UseN lake_N) -LangHun: tovak +LangHun: tavak Lang: PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN (DetQuant IndefArt NumPl) (UseN lake_N))) -LangHun: én látok tovakat +LangHun: én látok tavakat Lang: PrepNP to_Prep (DetCN (DetQuant IndefArt NumSg) (UseN lake_N)) LangHun: egy tóhoz Lang: PrepNP to_Prep (DetCN (DetQuant IndefArt NumPl) (UseN lake_N)) -LangHun: tovakhoz +LangHun: tavakhoz Lang: DetCN (DetQuant (PossPron i_Pron) NumSg) (UseN lake_N) LangHun: TODO From 53516a689fba20ac0617909002b5cfc5a74412a8 Mon Sep 17 00:00:00 2001 From: Julia Jansson Date: Tue, 21 Apr 2020 20:51:41 +0200 Subject: [PATCH 2/2] =?UTF-8?q?dL=C3=B3=20cases?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/hungarian/NounMorphoHun.gf | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/src/hungarian/NounMorphoHun.gf b/src/hungarian/NounMorphoHun.gf index ad3f2fe4f..5b57c0b78 100644 --- a/src/hungarian/NounMorphoHun.gf +++ b/src/hungarian/NounMorphoHun.gf @@ -45,6 +45,7 @@ oper } ; -- NB. arguments are Sg Nom, Pl Nom + -- handles words like: falu, daru, tetű -> falvak, darvak, tetvek dFalu : (nomsg : Str) -> (nompl : Str) -> Noun = \falu,falvak -> let falva = init falvak ; nFalva = mkNoun falva ; @@ -138,9 +139,15 @@ regNounNomAcc : (nom : Str) -> (acc : Str) -> Noun = \n,a -> <_ + "ó", -- ló, lovat _ + "o" + #c + #v + "t"> + |<_ + "ó", -- tó, tavat + _ + "a" + #c + #v + "t"> + |<_ + "ő", -- kő, követ _ + "ö" + #c + #v + "t"> + |<_ + "ű", -- fű, füvet + _ + "ü" + #c + #v + "t"> + |<_ + "é", -- lé, levet _ + "e" + #c + #v + "t"> => dLó n a ;