From 4d71dcd880639b1248278f1ce8c2721bc261faff Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Wed, 31 May 2006 14:56:42 +0000
Subject: [PATCH] Grammar without lexicon, new top module

---
 lib/resource-1.0/abstract/Grammar.gf   | 21 +++++++++++++++++++++
 lib/resource-1.0/abstract/Lang.gf      |  3 ++-
 lib/resource-1.0/english/GrammarEng.gf | 21 +++++++++++++++++++++
 lib/resource-1.0/swedish/GrammarSwe.gf | 21 +++++++++++++++++++++
 4 files changed, 65 insertions(+), 1 deletion(-)
 create mode 100644 lib/resource-1.0/abstract/Grammar.gf
 create mode 100644 lib/resource-1.0/english/GrammarEng.gf
 create mode 100644 lib/resource-1.0/swedish/GrammarSwe.gf

diff --git a/lib/resource-1.0/abstract/Grammar.gf b/lib/resource-1.0/abstract/Grammar.gf
new file mode 100644
index 000000000..460ab91f6
--- /dev/null
+++ b/lib/resource-1.0/abstract/Grammar.gf
@@ -0,0 +1,21 @@
+--1 The Main Module of the Resource Grammar
+
+-- This grammar a collection of the different grammar modules,
+-- To test the resource, import [Lang Lang.html], which also contains
+-- a lexicon.
+
+abstract Grammar = 
+  Noun,
+  Verb, 
+  Adjective,
+  Adverb,
+  Numeral,
+  Sentence, 
+  Question,
+  Relative,
+  Conjunction,
+  Phrase,
+  Text,
+  Structural,
+  Idiom
+  ** {} ;
diff --git a/lib/resource-1.0/abstract/Lang.gf b/lib/resource-1.0/abstract/Lang.gf
index af95313dd..6534dbf64 100644
--- a/lib/resource-1.0/abstract/Lang.gf
+++ b/lib/resource-1.0/abstract/Lang.gf
@@ -2,7 +2,8 @@
 
 -- This grammar is just a collection of the different modules,
 -- and the one that can be imported when one wants to test the
--- grammar. A smaller top module is [Test Test.html].
+-- grammar. A module without a lexicon is [Grammar Grammar.html],
+-- which may be more suitable to open in applications.
 
 abstract Lang = 
   Noun,
diff --git a/lib/resource-1.0/english/GrammarEng.gf b/lib/resource-1.0/english/GrammarEng.gf
new file mode 100644
index 000000000..932dd9821
--- /dev/null
+++ b/lib/resource-1.0/english/GrammarEng.gf
@@ -0,0 +1,21 @@
+--# -path=.:../abstract:../common:prelude
+
+concrete GrammarEng of Grammar = 
+  NounEng, 
+  VerbEng, 
+  AdjectiveEng,
+  AdverbEng,
+  NumeralEng,
+  SentenceEng,
+  QuestionEng,
+  RelativeEng,
+  ConjunctionEng,
+  PhraseEng,
+  TextX,
+  StructuralEng,
+  IdiomEng
+  ** {
+
+flags startcat = Phr ; unlexer = text ; lexer = text ;
+
+} ;
diff --git a/lib/resource-1.0/swedish/GrammarSwe.gf b/lib/resource-1.0/swedish/GrammarSwe.gf
new file mode 100644
index 000000000..109669dfb
--- /dev/null
+++ b/lib/resource-1.0/swedish/GrammarSwe.gf
@@ -0,0 +1,21 @@
+--# -path=.:../scandinavian:../abstract:../common:prelude
+
+concrete GrammarSwe of Grammar = 
+  NounSwe, 
+  VerbSwe, 
+  AdjectiveSwe,
+  AdverbSwe,
+  NumeralSwe,
+  SentenceSwe,
+  QuestionSwe,
+  RelativeSwe,
+  ConjunctionSwe,
+  PhraseSwe,
+  TextX,
+  IdiomSwe,
+  StructuralSwe
+  ** {
+
+flags startcat = Phr ;  unlexer = text ; lexer = text ;
+
+} ;