Commit 1f24d49ca0c2770e67fe525ceeb27b412d7f4412

Authored by Wojciech Jaworski
1 parent 56879132

bugfix w date-interval

subsyntax/ENIAMsubsyntax.ml
... ... @@ -79,6 +79,10 @@ let translate_digs paths = (* FIXME: brakuje initial, postal-code i być może i
79 79 | Compound("realnum-interval",[Dig(x,"realnum");Dig(y,"intnum")]) -> {t with token=Lemma(x ^ "-" ^ y,"realnum-interval",[[]]); cat="Number"}
80 80 | Compound("date-interval",[Compound("date",[Dig(d1,"day");Dig(m1,"month");Dig(y1,"year")]);
81 81 Compound("date",[Dig(d2,"day");Dig(m2,"month");Dig(y2,"year")])]) -> {t with token=Lemma(d1 ^ "." ^ m1 ^ "." ^ y1 ^ "-" ^ d2 ^ "." ^ m2 ^ "." ^ y2,"date-interval",[[]]); cat="DayNumber"}
  82 + | Compound("date-interval",[Compound("date",[Dig(d1,"day");Dig(m1,"month");Dig(y1,"2dig")]);
  83 + Compound("date",[Dig(d2,"day");Dig(m2,"month");Dig(y2,"year")])]) -> {t with token=Lemma(d1 ^ "." ^ m1 ^ "." ^ y1 ^ "-" ^ d2 ^ "." ^ m2 ^ "." ^ y2,"date-interval",[[]]); cat="DayNumber"}
  84 + | Compound("date-interval",[Compound("date",[Dig(d1,"day");Dig(m1,"month");Dig(y1,"2dig")]);
  85 + Compound("date",[Dig(d2,"day");Dig(m2,"month");Dig(y2,"2dig")])]) -> {t with token=Lemma(d1 ^ "." ^ m1 ^ "." ^ y1 ^ "-" ^ d2 ^ "." ^ m2 ^ "." ^ y2,"date-interval",[[]]); cat="DayNumber"}
82 86 | Compound("day-month-interval",[Compound("day-month",[Dig(d1,"day");Dig(m1,"month")]);
83 87 Compound("day-month",[Dig(d2,"day");Dig(m2,"month")])]) -> {t with token=Lemma(d1 ^ "." ^ m1 ^ "-" ^ d2 ^ "." ^ m2,"day-month-interval",[[]]); cat="DayNumber"}
84 88 | Compound("day-interval",[Dig(d1,"day");Dig(d2,"day")]) -> {t with token=Lemma(d1 ^ "-" ^ d2,"day-interval",[[]]); cat="DayNumber"}
... ...
subsyntax/resources/brev.tab
... ... @@ -159,7 +159,7 @@ I . I xxx
159 159 ib . ibidem xxx
160 160 ibid . ibidem xxx
161 161 ie . indoeuropejski adj:_:_:_:pos
162   -IgE Immunoglobina E subst:sg:_:f
  162 +IgE Immunoglobina E subst:sg:_:f
163 163 ilustr . ilustracja subst:_:_:f
164 164 im . imię subst:sg:nom:n:ncol
165 165 im . imię subst:sg:gen:n:ncol
... ... @@ -617,7 +617,7 @@ zm . zmarły subst:_:_:m1
617 617 zm . zemrzeć praet:_:_:perf
618 618 zm . zmarły adj:_:_:_:pos
619 619 zm . zmiana subst:_:_:f
620   -zm . zemrzeć praet:sg:_:m1.m2.m3
  620 +#zm . zemrzeć praet:sg:m1.m2.m3:perf
621 621 zn . znak subst:_:_:m3
622 622 zob . zobaczyć impt:sg:sec:perf
623 623 Zw . związek subst:_:_:m3
... ...