GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 08:58:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

an optimization which would be relevant with the new compiler

Browse Source
This commit is contained in:
Krasimir Angelov
2022-01-11 15:16:26 +01:00
parent 1d32508312
commit 2f10c2d769
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/scandinavian/NounScand.gf
View File

@@ -13,9 +13,9 @@ incomplete concrete NounScand of Noun =
let let
g = cn.g ; g = cn.g ;
m = cn.isMod ; m = cn.isMod ;
dd = case <det.det,detDef,m> of { dd = case <detDef,det.det,m> of {
<DDef Def, Indef, True> => DDef Indef ; <Indef, DDef Def, True> => DDef Indef ;
<d,_,_> => d <_,d,_> => d
} }
in { in {
s = \\c => det.s ! m ! g ++ s = \\c => det.s ! m ! g ++