diff options
| author | aarne <aarne@chalmers.se> | 2013-10-11 08:36:09 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2013-10-11 08:36:09 +0000 |
| commit | 3ca480f57d02a04a797ce3504b72866b03a3a99c (patch) | |
| tree | 89ad4639aec99ea3873c2a0f2de25971d8f50b52 /examples/translator/TranslateBul.gf | |
| parent | 824cf3222634baff7a75ce97a4f3d78d6951c0dc (diff) | |
added TranslateBul and translator/Makefile
Diffstat (limited to 'examples/translator/TranslateBul.gf')
| -rw-r--r-- | examples/translator/TranslateBul.gf | 13 |
1 files changed, 13 insertions, 0 deletions
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 |