Files
gf-core/lib/src/experimental/NDTransEng.gf
2014-03-11 20:57:17 +00:00

24 lines
492 B
Plaintext

--# -path=.:../translator
concrete NDTransEng of NDTrans =
NDLiftEng
,ExtensionsEng [CN,NP,AdA,AdV,CompoundCN,AdAdV,UttAdV,ApposNP]
,DictionaryEng - [Pol,Tense]
,DocumentationEng - [Pol,Tense]
,ChunkEng
** open ResEng, PredInstanceEng, Prelude, (Pr = PredEng) in {
flags
literal=Symb ;
lincat
TransUnit = {s : Str} ;
lin
SFullstop p = {s = p.s ++ "."} ;
SQuestmark p = {s = p.s ++ "?"} ;
SExclmark p = {s = p.s ++ "!"} ;
SUnmarked p = {s = p.s} ;
}