GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-22 09:32:53 -06:00
Code Issues Packages Projects Releases Wiki Activity

Structural.you*; reorganized scand

Browse Source
This commit is contained in:
aarne
2006-01-24 14:30:36 +00:00
parent 06cb55df48
commit 10f2fd2457
35 changed files with 114 additions and 572 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
lib/resource-1.0/swedish/DiffSwe.gf
View File

@@ -1,4 +1,4 @@
instance DiffSwe of DiffScand = open ResScand, Prelude in {
instance DiffSwe of DiffScand = open CommonScand, Prelude in {
-- Parameters.
@@ -53,14 +53,6 @@ instance DiffSwe of DiffScand = open ResScand, Prelude in {
Neutr => allt
} ;
reflPron : Agr -> Str = \a -> case a of {
{gn = Plg ; p = P1} => "oss" ;
{gn = Plg ; p = P2} => "er" ;
{p = P1} => "mig" ;
{p = P2} => "dig" ;
{p = P3} => "sig"
} ;
relPron : GenNum => RCase => Str = \\gn,c => case c of {
RNom => "som" ;
RGen => "vars" ;
@@ -69,6 +61,12 @@ instance DiffSwe of DiffScand = open ResScand, Prelude in {
pronSuch = gennumForms "sådan" "sådant" "sådana" ;
reflPron : Agr -> Str = \a -> case a of {
{gn = Plg ; p = P1} => "oss" ;
{gn = Plg ; p = P2} => "er" ;
{p = P1} => "mig" ;
{p = P2} => "dig" ;
{p = P3} => "sig"
} ;
}