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

reflected preposition stranding default in TranslateSwe by adding pied piping as second variant

Browse Source
This commit is contained in:
aarne
2016-06-05 11:16:54 +00:00
parent 7a3f33a5fc
commit 2320410d30
2 changed files with 11 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/src/translator/TranslateEng.gf
View File

@@ -31,11 +31,11 @@ concrete TranslateEng of Translate =
QuestionEng - [
QuestVP -- replaced by QuestVP | contracted QuestVP
,QuestIComp
,QuestSlash -- replaced by QuestSlash | StrandQuestSlash
,QuestSlash -- replaced by QuestSlash | PiedPipingQuestSlash
],
RelativeEng - [
IdRP -- with variants that/who/which/-
,RelSlash -- replaced by RelSlash | StrandRelSlash
,RelSlash -- replaced by RelSlash | PiedPipingRelSlash
],
IdiomEng,
ConstructionEng,

11
lib/src/translator/TranslateSwe.gf
View File

@@ -16,8 +16,12 @@ concrete TranslateSwe of Translate =
AdverbSwe,
PhraseSwe,
SentenceSwe,
QuestionSwe,
RelativeSwe,
QuestionSwe - [
QuestSlash -- replaced by QuestSlash | PiedPipingQuestSlash
],
RelativeSwe - [
RelSlash -- replaced by RelSlash | PiedPipingRelSlash
],
IdiomSwe,
ConstructionSwe,
DocumentationSwe,
@@ -45,5 +49,8 @@ lin
| {s = \\n,d,c => np.s ! NPPoss (gennum (ngen2gen cn.g) n) Nom ++ cn.s ! n ! DDef Indef ! c ; g = cn.g ; isMod = True} ---- overgenerating
;
RelSlash rp cls = G.RelSlash rp cls | E.PiedPipingRelSlash rp cls ;
QuestSlash ip cls = G.QuestSlash ip cls | E.PiedPipingQuestSlash ip cls ;
}