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

some fixes in pattern matching in Compute

Browse Source
This commit is contained in:
aarne
2008-05-27 20:54:31 +00:00
parent 6dcb4a068f
commit 99f19c65b3
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
resource-1.4/french/MorphoFre.gf
View File

@@ -11,7 +11,7 @@
resource MorphoFre = CommonRomance, ResFre ** resource MorphoFre = CommonRomance, ResFre **
open PhonoFre, Prelude, Predef in { open PhonoFre, Prelude, Predef in {
flags optimize=noexpand ; flags optimize=all ;
--2 Front vowels --2 Front vowels
-- --

4
resource-1.4/romance/CommonRomance.gf
View File

@@ -58,8 +58,8 @@ oper
} ; } ;
conjGender : Gender -> Gender -> Gender = \m,n -> conjGender : Gender -> Gender -> Gender = \m,n ->
case <m,n> of { case m of {
<Fem,Fem> => Fem ; Fem => n ;
_ => Masc _ => Masc
} ; } ;