forked from GitHub/gf-core
Changed module names.
This commit is contained in:
@@ -8,7 +8,7 @@
|
|||||||
--
|
--
|
||||||
-- We use the parameter types and word classes defined for morphology.
|
-- We use the parameter types and word classes defined for morphology.
|
||||||
|
|
||||||
resource Morpho = Types ** open Prelude in {
|
resource MorphoSwe = TypesSwe ** open Prelude in {
|
||||||
|
|
||||||
-- The indefinite and definite article
|
-- The indefinite and definite article
|
||||||
oper
|
oper
|
||||||
@@ -12,12 +12,12 @@
|
|||||||
--
|
--
|
||||||
-- The users of the resource grammar should not look at this file for the
|
-- The users of the resource grammar should not look at this file for the
|
||||||
-- linearization rules, which are in fact hidden in the document version.
|
-- linearization rules, which are in fact hidden in the document version.
|
||||||
-- They should use $resource.Abs.gf$ to access the syntactic rules.
|
-- They should use $ResAbs.gf$ to access the syntactic rules.
|
||||||
-- This file can be consulted in those, hopefully rare, occasions in which
|
-- This file can be consulted in those, hopefully rare, occasions in which
|
||||||
-- one has to know how the syntactic categories are
|
-- one has to know how the syntactic categories are
|
||||||
-- implemented. The parameter types are defined in $Types.gf$.
|
-- implemented. The parameter types are defined in $TypesSwe.gf$.
|
||||||
|
|
||||||
concrete ResSwe of ResAbs = open Prelude, Syntax in {
|
concrete ResSwe of ResAbs = open Prelude, SyntaxSwe in {
|
||||||
|
|
||||||
flags
|
flags
|
||||||
startcat=Phr ;
|
startcat=Phr ;
|
||||||
|
|||||||
@@ -1 +0,0 @@
|
|||||||
resource Svenska = reuse ResSwe ;
|
|
||||||
4
grammars/resource/swedish/Swedish.gf
Normal file
4
grammars/resource/swedish/Swedish.gf
Normal file
@@ -0,0 +1,4 @@
|
|||||||
|
-- use this path to read the grammar from the same directory
|
||||||
|
--# -path=.:../abstract:../../prelude
|
||||||
|
|
||||||
|
resource Swedish = reuse ResSwe ;
|
||||||
@@ -7,7 +7,7 @@
|
|||||||
--
|
--
|
||||||
-- The following modules are presupposed:
|
-- The following modules are presupposed:
|
||||||
|
|
||||||
resource Syntax = Morpho ** open Prelude, (CO = Coordination) in {
|
resource SyntaxSwe = MorphoSwe ** open Prelude, (CO = Coordination) in {
|
||||||
|
|
||||||
--2 Common Nouns
|
--2 Common Nouns
|
||||||
--
|
--
|
||||||
@@ -1,7 +1,7 @@
|
|||||||
-- use this path to read the grammar from the same directory
|
-- use this path to read the grammar from the same directory
|
||||||
--# -path=.:../abstract:../../prelude
|
--# -path=.:../abstract:../../prelude
|
||||||
|
|
||||||
concrete TestSwe of TestAbs = ResSwe ** open Syntax in {
|
concrete TestSwe of TestAbs = ResSwe ** open SyntaxSwe in {
|
||||||
|
|
||||||
flags startcat=Phr ; lexer=text ; parser=chart ; unlexer=text ;
|
flags startcat=Phr ; lexer=text ; parser=chart ; unlexer=text ;
|
||||||
|
|
||||||
@@ -12,6 +12,9 @@ lin
|
|||||||
Small = liten_1146 ;
|
Small = liten_1146 ;
|
||||||
Old = gammal_16 ;
|
Old = gammal_16 ;
|
||||||
Young = ung_29 ;
|
Young = ung_29 ;
|
||||||
|
American = extAdjective (aFin "amerikansk") ;
|
||||||
|
Finnish = extAdjective (aFin "finsk") ;
|
||||||
|
Married = extAdjective (aAbstrakt "gift") ** {s2 = "med"} ;
|
||||||
Man = extCommNoun Masc man_1144 ;
|
Man = extCommNoun Masc man_1144 ;
|
||||||
Woman = extCommNoun NoMasc (sApa "kvinn") ;
|
Woman = extCommNoun NoMasc (sApa "kvinn") ;
|
||||||
Car = extCommNoun NoMasc (sBil "bil") ;
|
Car = extCommNoun NoMasc (sBil "bil") ;
|
||||||
|
|||||||
@@ -9,7 +9,7 @@
|
|||||||
-- This GF grammar was obtained from the functional morphology file TypesSw.hs
|
-- This GF grammar was obtained from the functional morphology file TypesSw.hs
|
||||||
-- semi-automatically. The GF inflection engine obtained was obtained automatically.
|
-- semi-automatically. The GF inflection engine obtained was obtained automatically.
|
||||||
|
|
||||||
resource Types = open Prelude in {
|
resource TypesSwe = open Prelude in {
|
||||||
|
|
||||||
--
|
--
|
||||||
|
|
||||||
Reference in New Issue
Block a user