mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-22 09:46:22 -06:00
started a separate module for names
This commit is contained in:
@@ -118,7 +118,7 @@ concrete CatSom of Cat = CommonX - [Adv,IAdv] ** open ResSom, Prelude in {
|
||||
N = ResSom.Noun ;
|
||||
N2 = ResSom.Noun2 ;
|
||||
N3 = ResSom.Noun3 ;
|
||||
GN, SN, PN = ResSom.PNoun ;
|
||||
GN, SN, LN, PN = ResSom.PNoun ;
|
||||
|
||||
Adv = ResSom.Adverb ; -- Preposition of an adverbial can merge with obligatory complements of the verb.
|
||||
|
||||
|
||||
@@ -17,10 +17,4 @@ lin
|
||||
-- FocusAdV : AdV -> S -> Utt ; -- never will I sleep
|
||||
-- FocusAP : AP -> NP -> Utt ; -- green was the tree
|
||||
|
||||
lin GivenName, MaleSurname, FemaleSurname = \n -> n ;
|
||||
lin FullName gn sn = {
|
||||
s = gn.s ++ sn.s ;
|
||||
a = gn.a
|
||||
} ;
|
||||
|
||||
} ;
|
||||
|
||||
@@ -12,7 +12,8 @@ concrete GrammarSom of Grammar =
|
||||
TextX - [Adv,IAdv],
|
||||
StructuralSom,
|
||||
IdiomSom,
|
||||
TenseX - [Adv,IAdv]
|
||||
TenseX - [Adv,IAdv],
|
||||
NamesSom
|
||||
** {
|
||||
|
||||
flags startcat = Phr ; unlexer = text ; lexer = text ;
|
||||
|
||||
18
src/somali/NamesSom.gf
Normal file
18
src/somali/NamesSom.gf
Normal file
@@ -0,0 +1,18 @@
|
||||
concrete NamesSom of Names = CatSom ** open ResSom, Prelude in {
|
||||
|
||||
lin GivenName, MaleSurname, FemaleSurname = \n -> n ** {
|
||||
s = \\c => n.s ;
|
||||
isPron = False ;
|
||||
st = Definite ;
|
||||
empty = [] ;
|
||||
};
|
||||
|
||||
lin FullName gn sn = {
|
||||
s = \\c => gn.s ++ sn.s ;
|
||||
a = gn.a ;
|
||||
isPron = False ;
|
||||
st = Definite ;
|
||||
empty = [] ;
|
||||
} ;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user