diff --git a/lib/resource-1.0/romance/DiffRomance.gf b/lib/resource-1.0/romance/DiffRomance.gf index d9489bb8f..6ba1c8f6f 100644 --- a/lib/resource-1.0/romance/DiffRomance.gf +++ b/lib/resource-1.0/romance/DiffRomance.gf @@ -1,5 +1,13 @@ +--1 Differences between Romance languages + interface DiffRomance = open CommonRomance, Prelude in { +-- The first six constants show the essential differences +-- between French, Italian, and Romance syntaxes (as regards the +-- resource API). The other constants are either derivatively +-- dependent, or have as values strings, which are language-dependent +-- anyway. + --2 Constants whose definitions fundamentally depend on language -- Prepositions that fuse with the article @@ -27,6 +35,11 @@ interface DiffRomance = open CommonRomance, Prelude in { oper conjunctCase : NPForm -> NPForm ; +-- How infinitives and clitics are placed relative to each other +-- (Fre "la voir", Ita "vederla"). + + oper clitInf : Str -> Str -> Str ; + --2 Constants that must derivatively depend on language @@ -53,8 +66,6 @@ interface DiffRomance = open CommonRomance, Prelude in { conjThan : Str ; conjThat : Str ; - clitInf : Str -> Str -> Str ; - relPron : Bool => AAgr => Case => Str ; pronSuch : AAgr => Str ; diff --git a/lib/resource-1.0/romance/ResRomance.gf b/lib/resource-1.0/romance/ResRomance.gf index 4c145263e..33ca41a9b 100644 --- a/lib/resource-1.0/romance/ResRomance.gf +++ b/lib/resource-1.0/romance/ResRomance.gf @@ -32,8 +32,8 @@ oper } ; case2npform : Case -> NPForm = \c -> case c of { - Nom => Aton Nom ; - Acc => Aton Acc ; + Nom => Ton Nom ; + Acc => Ton Acc ; _ => Ton c } ;