From c5b2f9f1778ea47dcc649f4d210456e8bbf4e898 Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Thu, 13 Oct 2005 12:43:47 +0000
Subject: [PATCH] make resource

---
 resource/Makefile                     |  2 ++
 resource/MkResource.gfs               | 12 ++++++++++++
 resource/finnish/BasicFin.gf          |  2 +-
 resource/french/VerbphraseFre.gf      |  2 +-
 resource/romance/SyntaxRomanceVP.gf   |  2 +-
 resource/romance/VerbphraseRomance.gf |  8 ++++----
 6 files changed, 21 insertions(+), 7 deletions(-)
 create mode 100644 resource/Makefile
 create mode 100644 resource/MkResource.gfs

diff --git a/resource/Makefile b/resource/Makefile
new file mode 100644
index 000000000..14023dcc2
--- /dev/null
+++ b/resource/Makefile
@@ -0,0 +1,2 @@
+all:
+	gf  -src +RTS -K10M <MkResource.gfs
diff --git a/resource/MkResource.gfs b/resource/MkResource.gfs
new file mode 100644
index 000000000..30525b663
--- /dev/null
+++ b/resource/MkResource.gfs
@@ -0,0 +1,12 @@
+i finnish/LangFin.gf 
+s
+i french/LangFre.gf 
+i italian/LangIta.gf 
+i spanish/LangSpa.gf 
+s
+i norwegian/LangNor.gf 
+i swedish/LangSwe.gf 
+s
+i english/LangEng.gf
+s
+pm | wf langs.gfcm
diff --git a/resource/finnish/BasicFin.gf b/resource/finnish/BasicFin.gf
index 41a4bea98..25563504b 100644
--- a/resource/finnish/BasicFin.gf
+++ b/resource/finnish/BasicFin.gf
@@ -122,7 +122,7 @@ lin
   love_V2 = caseV2 (regV "rakastaa") partitive ;
   man_N = mkN "mies" "miehen" "miehenä" "miestä" "mieheen" 
             "miehinä" "miehissä" "miesten" "miehiä" "miehiin" human ;
-  married_A2 = mkA2 (mkA (regN "avioitunut")) (postpP genitive "kanssa") ;
+  married_A2 = mkA2 (mkA (nRae "avioitunut" "avioituneena")) (postpP genitive "kanssa") ;
   meat_N = nLukko "liha" ;
   milk_N = nLukko "maito" ;
   moon_N = regN "kuu" ;
diff --git a/resource/french/VerbphraseFre.gf b/resource/french/VerbphraseFre.gf
index 93ddbdc25..a21f9ab1e 100644
--- a/resource/french/VerbphraseFre.gf
+++ b/resource/french/VerbphraseFre.gf
@@ -1,3 +1,3 @@
 --# -path=.:../romance:../abstract:../../prelude
 concrete VerbphraseFre of Verbphrase = CategoriesFre **
-  VerbphraseRomance with (SyntaxScand=SyntaxFre) ;
+  VerbphraseRomance with (SyntaxRomanceVP=SyntaxFreVP) ;
diff --git a/resource/romance/SyntaxRomanceVP.gf b/resource/romance/SyntaxRomanceVP.gf
index 2b87e8cf7..771ae89af 100644
--- a/resource/romance/SyntaxRomanceVP.gf
+++ b/resource/romance/SyntaxRomanceVP.gf
@@ -10,7 +10,7 @@
 --
 -- The following files are presupposed:
 
-interface SyntaxRomance = TypesRomance ** open Prelude, (CO=Coordination) in {
+interface SyntaxRomanceVP = TypesRomance ** open Prelude, (CO=Coordination) in {
 
 --2 Common Nouns
 --
diff --git a/resource/romance/VerbphraseRomance.gf b/resource/romance/VerbphraseRomance.gf
index 5a1024d56..7f3c8ef75 100644
--- a/resource/romance/VerbphraseRomance.gf
+++ b/resource/romance/VerbphraseRomance.gf
@@ -20,9 +20,9 @@
 -- implemented. The parameter types are defined in $TypesEng.gf$.
 
 incomplete concrete VerbphraseRomance of Verbphrase = CategoriesRomance ** 
-  open Prelude, SyntaxRomance in {
+  open Prelude, SyntaxRomanceVP in {
 
-  flags optimize=all ;
+  flags optimize=all_subs ;
 
   lin
   UseV v = predClauseGroup v (complVerb v) ;
@@ -54,8 +54,8 @@ incomplete concrete VerbphraseRomance of Verbphrase = CategoriesRomance **
   RelVP = relVerbPhrase ;
   IntVP = intVerbPhrase ;
 
-  PosVP tp = predVerbGroup True tp ;
-  NegVP tp = predVerbGroup False tp ;
+--  PosVP tp = predVerbGroup True tp ;
+--  NegVP tp = predVerbGroup False tp ;
 
   AdvVP = adVerbPhrase ;
   SubjVP = subjunctVerbPhrase ;