msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

fix UseN and PositA

Browse Source
This commit is contained in:
Krasimir Angelov
2025-10-05 09:47:31 +02:00
parent 5146748f37
commit 35a650141e
6 changed files with 12 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/belarusian/AdjectiveBel.gf
View File

@@ -1,4 +1,4 @@
concrete AdjectiveBel of Adjective = CatBel ** { concrete AdjectiveBel of Adjective = CatBel ** {
--lin lin
-- PositA a = a ; PositA a = a ;
} }

4
src/belarusian/NounBel.gf
View File

@@ -1,4 +1,4 @@
concrete NounBel of Noun = CatBel ** { concrete NounBel of Noun = CatBel ** {
--lin lin
-- UseN n = n ; UseN n = n ;
} }

4
src/belarusian/ResBel.gf
View File

@@ -157,7 +157,7 @@ oper mkA : (_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> A =
oper Compl = {s : Str; c : Case} ; oper Compl = {s : Str; c : Case} ;
oper noPrep : Compl = {s=""; c=Acc} ; oper noPrep : Compl = {s=""; c=Acc} ;
oper CommonNoun = {s : Str} ; oper CommonNoun = Noun ;
oper AdjPhrase = {s : Str} ; oper AdjPhrase = A ;
} }

4
src/ukrainian/AdjectiveUkr.gf
View File

@@ -1,4 +1,4 @@
concrete AdjectiveUkr of Adjective = CatUkr ** { concrete AdjectiveUkr of Adjective = CatUkr ** {
--lin lin
-- PositA a = a ; PositA a = a ;
} }

4
src/ukrainian/NounUkr.gf
View File

@@ -1,4 +1,4 @@
concrete NounUkr of Noun = CatUkr ** { concrete NounUkr of Noun = CatUkr ** {
--lin lin
-- UseN n = n ; UseN n = n ;
} }

4
src/ukrainian/ResUkr.gf
View File

@@ -160,7 +160,7 @@ oper mkA : (_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> A =
oper Compl = {s : Str; c : Case} ; oper Compl = {s : Str; c : Case} ;
oper noPrep : Compl = {s=""; c=Acc} ; oper noPrep : Compl = {s=""; c=Acc} ;
oper CommonNoun = {s : Str} ; oper CommonNoun = N ;
oper AdjPhrase = {s : Str} ; oper AdjPhrase = A ;
} }