GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-25 18:58:56 -06:00
Code Issues Packages Projects Releases Wiki Activity

Swedish 1.4 complete

Browse Source
This commit is contained in:
aarne
2008-06-02 15:22:44 +00:00
parent 1a14b51f51
commit 41e0ba7f64
8 changed files with 169 additions and 63 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
lib/resource-1.4/scandinavian/CommonScand.gf
View File

@@ -231,6 +231,17 @@ oper
insertObj : (Agr => Str) -> VP -> VP = \obj,vp -> {
s = vp.s ;
a1 = vp.a1 ;
n2 = \\a => obj ! a ++ vp.n2 ! a ;
a2 = vp.a2 ;
ext = vp.ext ;
en2 = True ;
ea2 = vp.ea2 ;
eext = vp.eext
} ;
insertObjPost : (Agr => Str) -> VP -> VP = \obj,vp -> {
s = vp.s ;
a1 = vp.a1 ;
n2 = \\a => vp.n2 ! a ++ obj ! a ;