GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-09-10 20:36:02 -06:00
Code Issues Packages Projects Releases Wiki Activity

Fin: fix comparative and superlative adverbs

Browse Source
This commit is contained in:
adelon
2026-07-21 20:57:12 +02:00
parent 00790d98fa
commit d947e7e2e2
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/finnish/StemFin.gf
+1 -1
View File
@@ -76,7 +76,7 @@ oper
let let
tuoree = init (tuore.s ! NCase Sg Gen) ; tuoree = init (tuore.s ! NCase Sg Gen) ;
tuoreesti = tuoree + "sti" ; tuoreesti = tuoree + "sti" ;
tuoreemmin = init tuoree ; tuoreemmin = init tuoree + "in" ;
in {s = table { in {s = table {
AN f => tuore.s ! f ; AN f => tuore.s ! f ;
AAdv => if_then_Str isPos tuoreesti tuoreemmin AAdv => if_then_Str isPos tuoreesti tuoreemmin
src/finnish/stemmed/StemFin.gf
+1 -1
View File
@@ -148,7 +148,7 @@ oper
let let
tuoree = tuore.s ! 1 ; tuoree = tuore.s ! 1 ;
tuoreesti = tuoree + "sti" ; tuoreesti = tuoree + "sti" ;
tuoreemmin = init tuoree ; tuoreemmin = init tuoree + "in" ;
in {s = table { in {s = table {
SAN f => tuore.s ! f ; SAN f => tuore.s ! f ;
SAAdv => if_then_Str isPos tuoreesti tuoreemmin SAAdv => if_then_Str isPos tuoreesti tuoreemmin