From 3ca480f57d02a04a797ce3504b72866b03a3a99c Mon Sep 17 00:00:00 2001 From: aarne Date: Fri, 11 Oct 2013 08:36:09 +0000 Subject: added TranslateBul and translator/Makefile --- examples/translator/TranslateBul.gf | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 examples/translator/TranslateBul.gf (limited to 'examples/translator/TranslateBul.gf') diff --git a/examples/translator/TranslateBul.gf b/examples/translator/TranslateBul.gf new file mode 100644 index 000000000..86d7832c6 --- /dev/null +++ b/examples/translator/TranslateBul.gf @@ -0,0 +1,13 @@ +--# -path=.:alltenses:../phrasebook:../../lib/src/bulgarian + +concrete TranslateBul of Translate = ParseBul, PhrasebookBul ** open SyntaxBul, (E = ExtraBul), Prelude in { + +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 = SyntaxBul.mkAdv in_Prep np ; to = SyntaxBul.mkAdv to_Prep np} ; + +} \ No newline at end of file -- cgit v1.2.3