GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-12 22:39:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

SSubjS in Scandinavian and Dut

Browse Source
This commit is contained in:
aarne
2012-06-08 08:51:03 +00:00
parent 1838781123
commit e7f272f4fe
3 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/src/dutch/SentenceDut.gf
View File

@@ -65,4 +65,6 @@ concrete SentenceDut of Sentence = CatDut ** open ResDut, Prelude in {
RelS s r = {s = \\o => s.s ! o ++ "," ++ r.s ! Neutr ! Sg} ;
SSubjS a s b = {s = \\o => a.s ! o ++ "," ++ s.s ++ b.s ! Sub} ;
}

2
lib/src/english/SentenceEng.gf
View File

@@ -59,7 +59,7 @@ concrete SentenceEng of Sentence = CatEng ** open Prelude, ResEng in {
AdvS a s = {s = a.s ++ s.s} ;
ExtAdvS a s = {s = a.s ++ "," ++ s.s} ;
SSubjS a s b = {s = a.s ++ s.s ++ b.s} ;
SSubjS a s b = {s = a.s ++ "," ++ s.s ++ b.s} ;
RelS s r = {s = s.s ++ "," ++ r.s ! agrP3 Sg} ;

2
lib/src/scandinavian/SentenceScand.gf
View File

@@ -62,4 +62,6 @@ incomplete concrete SentenceScand of Sentence =
RelS s r = {s = \\o => s.s ! o ++ "," ++ r.s ! agrP3 Neutr Sg ! RPrep True } ; --- vilket
SSubjS a s b = {s = \\o => a.s ! o ++ "," ++ s.s ++ b.s ! Sub} ;
}