GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-30 14:52:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

Translate grammar for Ger and Hin added. Some functions in Ger phrasebook need to be commented out to compile. Now a system for 7 languages can be built, but including Fre as well is too heavy on my laptop although it can be compiled separately.

Browse Source
This commit is contained in:
aarne
2013-11-28 08:03:50 +00:00
parent f49a8df60c
commit 6401a37e21
8 changed files with 74 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
examples/translator/TranslateGer.gf Normal file
View File

@@ -0,0 +1,27 @@
--# -path=.:alltenses:../phrasebook:../../lib/src/english:../../lib/src/german
concrete TranslateGer of Translate =
ParseGer - [open_A],
PhrasebookGer - [PSentence, PQuestion, PGreetingMale, PGreetingFemale, GObjectPlease]
** open SyntaxGer, ParadigmsGer, (E = ExtraGer), Prelude in {
flags
literal = Symb ;
lin
PPhr p = lin Text p ;
NP_Person np = {name = lin NP np ; isPron = False ; poss = mkQuant he_Pron} ;
NP_Object np = lin NP np ;
NP_Item np = lin NP np ;
NP_Place np0 = let np = lin NP np0 in
{name = np ; at = SyntaxGer.mkAdv in_Prep np ; to = SyntaxGer.mkAdv to_Prep np} ;
NP_Name np = lin NP np ;
--- to remove Phrasebook punctuation, which makes the output in Translate heterogeneous
PSentence s = lin Text (mkUtt s) ;
PQuestion s = lin Text (mkUtt s) ;
PGreetingMale, PGreetingFemale = \g -> lin Text g ;
GObjectPlease o = lin Text (mkUtt o) ;
}