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

Remove superfluous RP argument to EmptyRelSlash.

Browse Source
This commit is contained in:
bjorn
2008-10-29 13:06:03 +00:00
parent fa061ce136
commit 0b2f87ee1f
4 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
next-lib/src/abstract/Extra.gf
View File

@@ -11,7 +11,7 @@ abstract Extra = Cat ** {
ComplBareVS : VS -> S -> VP ; -- know you go ComplBareVS : VS -> S -> VP ; -- know you go
StrandRelSlash : RP -> ClSlash -> RCl ; -- that he lives in StrandRelSlash : RP -> ClSlash -> RCl ; -- that he lives in
EmptyRelSlash : RP -> ClSlash -> RCl ; -- he lives in EmptyRelSlash : ClSlash -> RCl ; -- he lives in
StrandQuestSlash : IP -> ClSlash -> QCl ; -- whom does John live with StrandQuestSlash : IP -> ClSlash -> QCl ; -- whom does John live with
-- $VP$ conjunction, which has different fragments implemented in -- $VP$ conjunction, which has different fragments implemented in

2
next-lib/src/english/ExtraEng.gf
View File

@@ -10,7 +10,7 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
rp.s ! RC (fromAgr ag).g Acc ++ slash.s ! t ! a ! p ! ODir ++ slash.c2 ; rp.s ! RC (fromAgr ag).g Acc ++ slash.s ! t ! a ! p ! ODir ++ slash.c2 ;
c = Acc c = Acc
} ; } ;
EmptyRelSlash rp slash = { EmptyRelSlash slash = {
s = \\t,a,p,_ => slash.s ! t ! a ! p ! ODir ++ slash.c2 ; s = \\t,a,p,_ => slash.s ! t ! a ! p ! ODir ++ slash.c2 ;
c = Acc c = Acc
} ; } ;

2
next-lib/src/latin/ExtraLat.gf
View File

@@ -10,7 +10,7 @@
-- rp.s ! RC (fromAgr ag).g Acc ++ slash.s ! t ! a ! p ! ODir ++ slash.c2 ; -- rp.s ! RC (fromAgr ag).g Acc ++ slash.s ! t ! a ! p ! ODir ++ slash.c2 ;
-- c = Acc -- c = Acc
-- } ; -- } ;
-- EmptyRelSlash rp slash = { -- EmptyRelSlash slash = {
-- s = \\t,a,p,_ => slash.s ! t ! a ! p ! ODir ++ slash.c2 ; -- s = \\t,a,p,_ => slash.s ! t ! a ! p ! ODir ++ slash.c2 ;
-- c = Acc -- c = Acc
-- } ; -- } ;

2
next-lib/src/scandinavian/ExtraScand.gf
View File

@@ -13,7 +13,7 @@ incomplete concrete ExtraScand of ExtraScandAbs = CatScand **
rp.s ! ag.gn ! RNom ++ slash.s ! t ! a ! p ! Sub ++ slash.c2.s ; rp.s ! ag.gn ! RNom ++ slash.s ! t ! a ! p ! Sub ++ slash.c2.s ;
c = NPAcc c = NPAcc
} ; } ;
EmptyRelSlash rp slash = { EmptyRelSlash slash = {
s = \\t,a,p,ag => s = \\t,a,p,ag =>
slash.s ! t ! a ! p ! Sub ++ slash.c2.s ; slash.s ! t ! a ! p ! Sub ++ slash.c2.s ;
c = NPAcc c = NPAcc