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

Use the .s field of .c2 fields in ExtraScand instead of plain .c2 to get it to compile.

Browse Source
This commit is contained in:
bringert
2008-08-12 15:15:06 +00:00
parent 636300cc09
commit 12ea512bdf
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
lib/resource/scandinavian/ExtraScand.gf
View File

@@ -10,12 +10,12 @@ incomplete concrete ExtraScand of ExtraScandAbs = CatScand **
StrandRelSlash rp slash = {
s = \\t,a,p,ag =>
rp.s ! ag.gn ! RNom ++ slash.s ! t ! a ! p ! Sub ++ slash.c2 ;
rp.s ! ag.gn ! RNom ++ slash.s ! t ! a ! p ! Sub ++ slash.c2.s ;
c = NPAcc
} ;
EmptyRelSlash rp slash = {
s = \\t,a,p,ag =>
slash.s ! t ! a ! p ! Sub ++ slash.c2 ;
slash.s ! t ! a ! p ! Sub ++ slash.c2.s ;
c = NPAcc
} ;
@@ -25,8 +25,8 @@ incomplete concrete ExtraScand of ExtraScandAbs = CatScand **
cls = slash.s ! t ! a ! p ;
who = ip.s ! accusative
in table {
QDir => who ++ cls ! Inv ++ slash.c2 ;
QIndir => who ++ cls ! Sub ++ slash.c2
QDir => who ++ cls ! Inv ++ slash.c2.s ;
QIndir => who ++ cls ! Sub ++ slash.c2.s
}
} ;
@@ -42,6 +42,6 @@ incomplete concrete ExtraScand of ExtraScandAbs = CatScand **
s = \\v,a => infVP vp a ---- no sup
} ;
ConjVPI = conjunctDistrTable2 VPIForm Agr ;
ComplVPIVV vv vpi = insertObj (\\a => vv.c2 ++ vpi.s ! VPIInf ! a) (predV vv) ;
ComplVPIVV vv vpi = insertObj (\\a => vv.c2.s ++ vpi.s ! VPIInf ! a) (predV vv) ;
}