module for irregular verbs and eat_V2 in Lexicon

This commit is contained in:
Krasimir Angelov
2026-05-06 15:11:03 +02:00
parent 3a8527689c
commit cf6a376272
5 changed files with 15 additions and 2 deletions

View File

@@ -2,5 +2,6 @@
concrete AllHun of AllHunAbs =
LangHun,
IrregHun,
ExtendHun
** {} ;

View File

@@ -2,5 +2,6 @@
abstract AllHunAbs =
Lang,
IrregHunAbs,
Extend
** {} ;

View File

@@ -0,0 +1,7 @@
--# -path=.:prelude:../abstract:../common
concrete IrregHun of IrregHunAbs = CatHun ** open ParadigmsHun in {
lin
eszem_V = mkV "eszem" "eszel" "eszik" "eszünk" "esztek" "esznek"
"ettem" "ettél" "evett" "ettünk" "ettetek" "ettek"
"enni" ;
}

View File

@@ -0,0 +1,4 @@
abstract IrregHunAbs = Cat ** {
fun
eszem_V : V ;
}

View File

@@ -1,5 +1,5 @@
concrete LexiconHun of Lexicon = CatHun **
open ParadigmsHun, ParamHun, Prelude in {
open ParadigmsHun, ParamHun, IrregHun, Prelude in {
----
-- A
@@ -105,7 +105,7 @@ lin door_N = mkN "ajtó" "ajtót" ;
lin ear_N = mkN "fül" "fület";
lin earth_N = mkN "föld" "földet";
-- lin eat_V2 = mkV2 "" ;
lin eat_V2 = mkV2 eszem_V ;
lin egg_N = mkN "tojás" "tojást" ;
lin empty_A = mkA "üres" ;
lin enemy_N = mkN "ellenség" "ellenséget" ;