Swedish relatives

2026-05-21 09:02:50 -06:00 · 2005-12-08 09:56:15 +00:00
parent 0ca556122c
commit a8a5080693
8 changed files with 78 additions and 41 deletions
--- a/lib/resource-1.0/swedish/DiffSwe.gf
+++ b/lib/resource-1.0/swedish/DiffSwe.gf
@@ -50,4 +50,14 @@ instance DiffSwe of DiffScand = open ResScand, Prelude in {
        Neutr => allt
        } ;

+    relPron : GenNum => RCase => Str = \\gn,c => case c of {
+      RNom  => "som" ;
+      RGen  => "vars" ;
+      RPrep => gennumForms "vilken" "vilket" "vilka" ! gn
+      } ;
+
+    pronSuch = gennumForms "sådan" "sådant" "sådana" ;
+
+
+
 }
--- a/lib/resource-1.0/swedish/RelativeSwe.gf
+++ b/lib/resource-1.0/swedish/RelativeSwe.gf
@@ -0,0 +1,2 @@
+concrete RelativeSwe of Relative = CatSwe ** RelativeScand with
+  (DiffScand = DiffSwe) ;
--- a/lib/resource-1.0/swedish/TestSwe.gf
+++ b/lib/resource-1.0/swedish/TestSwe.gf
@@ -8,7 +8,7 @@ concrete TestSwe of Test =
 --  -- NumeralSwe,
  SentenceSwe,
  QuestionSwe,
--  RelativeSwe,
+  RelativeSwe,
  ConjunctionSwe,
  PhraseSwe,
  UntensedSwe,