GitHub/gf-rgl
1
0 Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-11-03 19:25:27 -07:00
Code Issues Packages Projects Releases Wiki Activity

parad fixes

Browse Source
This commit is contained in:
aarne committed 2004-08-27 15:21:09 +00:00
1 parent 351956e6d1
commit 1ad8ce57b5
2 files changed
+17 -1
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

resource-0.6/english/ParadigmsEng.gf
+1 -1
View File
@@ -237,7 +237,7 @@ oper
apReg = \s -> AdjP1 (mkAdj1 s) ;
aGen : Str -> AdjDeg = \s -> case last s of {
"y" => mkAdjDeg s (init s ++ "ier") (init s + "iest") ;
"y" => mkAdjDeg s (init s + "ier") (init s + "iest") ;
"e" => mkAdjDeg s (s + "r") (s + "st") ;
_ => aReg s
} ;