summaryrefslogtreecommitdiff
path: root/next-lib/src/bulgarian/RelativeBul.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2009-06-22 15:39:08 +0000
committeraarne <aarne@chalmers.se>2009-06-22 15:39:08 +0000
commite89fdae2fa1626348d8025824a7469252fa85e42 (patch)
treec7d46bbd0494043b4bd6f917a25a7687517d0547 /next-lib/src/bulgarian/RelativeBul.gf
parent3049b59b35b25381a7c6787444165c200d66e08b (diff)
next-lib renamed to lib, lib to old-lib
Diffstat (limited to 'next-lib/src/bulgarian/RelativeBul.gf')
-rw-r--r--next-lib/src/bulgarian/RelativeBul.gf34
1 files changed, 0 insertions, 34 deletions
diff --git a/next-lib/src/bulgarian/RelativeBul.gf b/next-lib/src/bulgarian/RelativeBul.gf
deleted file mode 100644
index 19e4f4af3..000000000
--- a/next-lib/src/bulgarian/RelativeBul.gf
+++ /dev/null
@@ -1,34 +0,0 @@
-concrete RelativeBul of Relative = CatBul ** open ResBul in {
- flags coding=cp1251 ;
-
-
- flags optimize=all_subs ;
-
- lin
- RelCl cl = {
- s = \\t,a,p,agr => suchRP ! agr.gn ++ "че" ++ cl.s ! t ! a ! p ! Main ;
- role = RSubj
- } ;
-
- RelVP rp vp = {
- s = \\t,a,p,agr =>
- let
- cl = mkClause (rp.s ! agr.gn) agr vp
- in
- cl.s ! t ! a ! p ! Main ;
- role = RSubj
- } ;
-
- RelSlash rp slash = {
- s = \\t,a,p,agr => slash.c2.s ++ rp.s ! agr.gn ++ slash.s ! agr ! t ! a ! p ! Main ;
- role = RObj Acc
- } ;
-
- FunRP p np rp = {
- s = \\gn => np.s ! RObj Acc ++ p.s ++ (case p.c of {Acc => []; Dat => "на"}) ++ rp.s ! gn ;
- } ;
-
- IdRP = {
- s = whichRP ;
- } ;
-}