apertium-dict-hbs-slv-cg-fix.patch

   1 --- apertium-hbs-slv-0.5.0/apertium-hbs-slv.hbs-slv.rlx.orig    2013-04-30 14:59:01.000000000 +0200
   2 +++ apertium-hbs-slv-0.5.0/apertium-hbs-slv.hbs-slv.rlx 2013-06-27 18:29:14.061089090 +0200
   3 @@ -205,15 +205,15 @@
   4
   5  # This is a heuristic:
   6  SELECT:vbserORvblex VBLex IF (0 VBSer OR VBLex) (1* Nomen + Acc BARRIER V - Clt)
   7 -REMOVE:vbserORvblex VBLex IF (0 VBSer OR VBLex) (NEGATE -1* Nomen + Acc LINK 1 VBSer + Clt BARRIER V-FIN OR BOS) (NEGATE 1* Nomen + Acc LINK 1 VBSer + Clt BARRIER V-FIN OR EOS)
   8 +REMOVE:vbserORvblex VBLex IF (0 VBSer OR VBLex) (NEGATE -1* (Nomen + Acc LINK 1 VBSer + Clt) BARRIER V-FIN OR BOS) (NEGATE 1* (Nomen + Acc LINK 1 VBSer + Clt) BARRIER V-FIN OR EOS)
   9
  10  SELECT VBSer IF (-1* Lp );
  11  SELECT VBSer IF (1* Lp BARRIER V - Lp - PresParticiple );
  12
  13  SELECT:PerfectNotOptative Lp (0C Lp OR Optative) (-1* VBSer BARRIER BOS) ;
  14  SELECT:PerfectNotOptative Lp (0C Lp OR Optative) (1* VBSer BARRIER EOS) ;
  15 -SELECT:PerfectNotOptative Lp (0C Lp OR Optative) (-1 MeTeSePron BARRIER BOS) ;
  16 -SELECT:PerfectNotOptative Lp (0C Lp OR Optative) (1 MeTeSePron BARRIER EOS) ;
  17 +SELECT:PerfectNotOptative Lp (0C Lp OR Optative) (-1 MeTeSePron) ;
  18 +SELECT:PerfectNotOptative Lp (0C Lp OR Optative) (1 MeTeSePron) ;
  19      ## These are all ways how perfect can be made
  20
  21  SELECT:l-participleNumber $$NUMBER (0C Lp OR Optative) ( (-1* VBSer + $$NUMBER BARRIER BOS) OR  (1* VBSer + $$NUMBER BARRIER EOS) );
  22 @@ -230,7 +230,7 @@
  23
  24  SELECT:Nom+Perfect NP-HEAD + $$NUMBER + $$GENDER + Nom IF
  25                           (0 NP-HEAD + $$NUMBER + $$GENDER)
  26 -                         (1* V-COP + $$NUMBER LINK 1 Lp + $$NUMBER + $$GENDER BARRIER S-BOUNDARY) ;
  27 +                         (1* (V-COP + $$NUMBER LINK 1 Lp + $$NUMBER + $$GENDER) BARRIER S-BOUNDARY) ;
  28      ## Radovanović je ušla u povijest kao prva žena-pilot u Srbiji.
  29
  30  SELECT:BOS-Nom-Viv $$NUMBER + Nom IF (-1 BOS OR Cm) (1* V-FIN + Intransitive + $$NUMBER BARRIER Cm) ;
  31 @@ -464,7 +464,7 @@
  32  SELECT $$NUMBER (O PassiveParticiple) (-1* VBSer LINK -1* Particle + Interrogative LINK -1 V + $$NUMBER) ;
  33      ## "hoću li biti primljena"
  34
  35 -REMOVE:notParticiple Participle (-1 VBMod) (NOT 1 V BARRIER EOS) ;
  36 +REMOVE:notParticiple Participle (-1 VBMod) (NOT 1 V) ;
  37
  38  REMOVE:IsNotAdverb Adv (NOT -1* VBLex BARRIER BOS OR CS OR CC) (NOT 1* VBLex BARRIER EOS OR CS OR CC);
  39      ## Bilo je teško,...
  40 @@ -543,7 +543,7 @@
  41  MAP:Adverb→Verb (@V→) TARGET Adv (1C V)
  42  MAP:Verb←Adverb (@V←) TARGET Adv (-1C V)
  43  MAP:Verb←...←Adverb (@V←) TARGET Adv (-1*C V BARRIER BOS OR Cm) (1C Cm OR EOS)
  44 -MAP:Adverb→...→Verb (@V←) TARGET Adv (NOT -1*C V BARRIER BOS OR Cm) (1C V BARRIER EOS)
  45 +MAP:Adverb→...→Verb (@V←) TARGET Adv (NOT -1*C V BARRIER BOS OR Cm) (1C V)
  46  ## Participles and such Note: Looks like a copy paste, but was thought through :) Could perhaps be made more universal though
  47  ### l-participle
  48  MAP:Lp→VBSer (@V→) TARGET Lp (1C VBSer + Clt)