mahta.fetrat
/
HomoFast-eSpeak-Persian
Watch 1
Star 0
Fork 0
Code Issues 0 Pull Requests 0 Releases 0 Wiki Activity
Browse Source

Merge remote-tracking branch 'ValdisVitolins/master'

master
Reece H. Dunn 8 years ago
parent
c80829a5fd 50983ed05e
commit
fe3e3350e4
3 changed files with 100 additions and 150 deletions
Unified View Show Diff Stats
  1. 52
    113
      dictsource/lv_rules
  2. 2
    3
      docs/dictionary.md
  3. 46
    34
      src/libespeak-ng/dictionary.c

+ 52
- 113
dictsource/lv_rules View File



.replace .replace
ó ȯ // replace o-acute with o-dot, as it is more logical for "short o" ó ȯ // replace o-acute with o-dot, as it is more logical for "short o"
ḩ h
// +---------------------------+ // +---------------------------+
// | Suffixes of nouns | // | Suffixes of nouns |
// +---------------------------+ // +---------------------------+
.L22 č ģ j k ļ ņ ŗ š ž dž bj pj mj vj // consonant narrowers of e .L22 č ģ j k ļ ņ ŗ š ž dž bj pj mj vj // consonant narrowers of e
.L23 s i m // remaining ending of the 2. and 5. decl. words .L23 s i m // remaining ending of the 2. and 5. decl. words
.L27 č e ē f ģ h ḩ i ī j k ļ ņ q ŗ š w x y ž ei ie iu // all narrowers of e .L27 č e ē f ģ h ḩ i ī j k ļ ņ q ŗ š w x y ž ei ie iu // all narrowers of e
// Also: .L41 — international consonants and diphthongs as a narrowers of e/ē
// Also: .L41 — international consonants and diphthongs as a narrowers of e/ē


// E wideners // E wideners
.L24 a ā u ū ai au // vowel wideners of e .L24 a ā u ū ai au // vowel wideners of e
// but it is mixed with ȯ and ō // but it is mixed with ȯ and ō
.L25 b c d g ķ l m n p r s t v z dz // consonant wideners of e .L25 b c d g ķ l m n p r s t v z dz // consonant wideners of e
.L28 a ā b c d e ē g ķ l m n p r s t u ū v z ai au // all wideners of e .L28 a ā b c d e ē g ķ l m n p r s t u ū v z ai au // all wideners of e


// +---------------------------+ // +---------------------------+
// | Pronunciation of o | // | Pronunciation of o |
// | Consonant groups | // | Consonant groups |
// +---------------------------+ // +---------------------------+


.L60 b d dz dž g ģ j l ļ m n ņ r v z ž // voiced (loud) consonants
.L60 b d dz dž g ģ j l ļ m n ņ r v z ž // voiced (loud) consonants
.L61 p t k ķ c č s š f h ḩ // unvoiced (silent) consonants .L61 p t k ķ c č s š f h ḩ // unvoiced (silent) consonants
.L62 b c d f g h j k l m n p q r s t v w x z // hard consonants .L62 b c d f g h j k l m n p q r s t v w x z // hard consonants
.L63 č ģ ḩ ķ ļ ņ ŗ š ž // soft consonants .L63 č ģ ḩ ķ ļ ņ ŗ š ž // soft consonants
.L64 s t .L64 s t
.L65 t d j s š // root endings for verbs and adjectives .L65 t d j s š // root endings for verbs and adjectives
.L66 g ģ
.L66 g ģ
.L67 k ķ .L67 k ķ
.L68 n r .L68 n r
.L69 k s .L69 k s
.L93 m l n // vowel (pre)lengtheners — vowels after these are spelled longer than usual .L93 m l n // vowel (pre)lengtheners — vowels after these are spelled longer than usual
// j is vowel (post)lengthener, but as only one is handled in group j // j is vowel (post)lengthener, but as only one is handled in group j



// +---------------------------+
// | All letters |
// +---------------------------+
// These are used for "." like padding
.L10 a ā b c č d e ē f g ģ h ḩ i ī j k ķ l ļ m n ņ o ō p q r ŗ s š t u ū v w x y z ž

// +---------------------------+ // +---------------------------+
// | Pronunciation groups | // | Pronunciation groups |
// +---------------------------+ // +---------------------------+


.group c .group c
c ts c ts
L55) c (L55 ts>
c (C ts_! c (C ts_!


.group č .group č
č tS č tS
L55) č (L55 tS>


.group d .group d
d d d d
.group e .group e
e e // Default as narrow e e e // Default as narrow e
ee e_|e // internationalisms, prefix: ne-e... ee e_|e // internationalisms, prefix: ne-e...
ei ei
ei (+ ei


// narrow e ---------------------------------------------------------------------- // // narrow e ---------------------------------------------------------------------- //
a) e (ro e // internationalsms
a) e (ro e // internationalisms
e (o e e (o e
// international consonants // international consonants
e (L10L10L10L41 e
e (L10L10L41+ e
e (L10L41++ e
e (JL41+ e
e (L41+++ e e (L41+++ e
L41) e (@ e // narrow only if there is another syllable for ending
L41L10) e (@ e
L41L10L10) e (@< e
L41L10L10L10) e (@<< e
L41) e (@ e // narrow only if there is another syllable for ending
L41J) e (@+ e


// narrowing vowels follow // narrowing vowels follow
e (Cinā e e (Cinā e
e (CL05_ e // 5. decl. words e (CL05_ e // 5. decl. words
e (CCL05_< e e (CCL05_< e
e (CCCL05_<< e e (CCCL05_<< e
e (L10L05_+ e
e (L10L10L05_ e
e (L10L10L10L05_< e
e (L10L10L10L10L05_<< e
e (JL05_+ e


// wide e ------------------------------------------------------------------------ // // wide e ------------------------------------------------------------------------ //
// widening consonants follow // widening consonants follow
e (L01_ E e (L01_ E
e (L25L01_ E e (L25L01_ E
e (L25L25L01_ E e (L25L25L01_ E
e (Jam E
L25) e (L18_+ E // vareni etc. L25) e (L18_+ E // vareni etc.


// specific words ----------------------------------------------------------------- // // specific words ----------------------------------------------------------------- //
// āb) e (L77L05_ e // ābele
b) e (dL82L05_ e // bedre
e (lL88 e // ..el[tš]
b) e (dL82L05_ e // bedre
_b) e (t_ e _b) e (t_ e
_b) e (z e _b) e (z e
_b) e (z_ e _b) e (z_ e
_C) e (_ e // re, te, ve
_C) e (_ e // re, te, ve
_č) e (trL07_ e // četri _č) e (trL07_ e // četri
d) ebe (L83 ebe d) ebe (L83 ebe
d) ebe (t ebe d) ebe (t ebe


// narrow ē ---------------------------------------------------------------------- // // narrow ē ---------------------------------------------------------------------- //
// narrowing international consonants // narrowing international consonants
ē (L10L10L10L41 e:
ē (L10L10L41 e:
ē (L10L41 e:
ē (L41+ e: ē (L41+ e:
L41) ē (@ e: // narrow only if there is another syllable for ending
L41L10) ē (@ e:
L41L10L10) ē (@< e:
L41L10L10L10) ē (@<< e:
L41L10L10L10L10) ē (@<<< e:
ē (JL41+ e:
ē (L41+ e:
L41) ē (@+ e: // narrow only if there is another syllable for ending
L41J) ē (@ e:
// narrowing vowels follow // narrowing vowels follow
ē (CCCCL21 e: ē (CCCCL21 e:
ē (CCCL21 e: ē (CCCL21 e:
ē (CL05_ e: ē (CL05_ e:
ē (CCL05_< e: ē (CCL05_< e:
ē (CCCL05_<< e: ē (CCCL05_<< e:
ē (L10L05_+ e:
ē (L10L10L05_ e:
ē (L10L10L10L05_< e:
ē (L10L10L10L10L05_<< e:
ē (JL05_+ e:




// specific words ------------------------------------------------------------------- // // specific words ------------------------------------------------------------------- //
ēdē e:de: ēdē e:de:
ē (kL04_+ E: // ēka ē (kL04_+ E: // ēka
ē (L86L13_ e: // ēst ē (L86L13_ e: // ēst
ē (rkšķ e:
ē (rkšķ e:
ē (tā_ E: ē (tā_ E:
ē (tL55_ E: ē (tL55_ E:
izp) ē (t e: izp) ē (t e:
šķ) ē (L77L05_ e: // šķēle šķ) ē (L77L05_ e: // šķēle
šķ) ē (L82L05_ e: // šķēre šķ) ē (L82L05_ e: // šķēre
_tāp) ē (c_ e: // tāpēc _tāp) ē (c_ e: // tāpēc
t) ē (L90 e:
t) ē (L90 e:
t) ē (mL04_ e: // ..tēma t) ē (mL04_ e: // ..tēma
v) ērtē e:Rte: v) ērtē e:Rte:


.group f .group f
f f f f
L55) f (L55 f>


.group g .group g
g g g g


.group h .group h
h h h h
L55) h (L55 h>


.group i .group i
i i i i


.group k .group k
k k k k
L55) k (L55 k>
k (ļ k} // tiny pause between k and ļ k (ļ k} // tiny pause between k and ļ


.group ķ .group ķ
ķ c ķ c
L55) ķ (L55 c>
ķ (L55 c} // tiny pause for sharper sound before short vowels ķ (L55 c} // tiny pause for sharper sound before short vowels


.group l .group l
L42) o o: // o prefixes L42) o o: // o prefixes
o (L43+ o // o postfixes o (L43+ o // o postfixes


// o indicators before
L41L10L10L10L10L10L10L10L10L10) o (<<<<<<<<<< o
L41L10L10L10L10L10L10L10L10) o (<<<<<<<<< o
L41L10L10L10L10L10L10L10) o (<<<<<<< o
L41L10L10L10L10L10L10) o (<<<<<< o
L41L10L10L10L10L10) o (<<<<< o
L41L10L10L10L10) o (<<<< o
L41L10L10L10) o (<<< o
L41L10L10) o (<< o
L41L10) o (< o
L41) o o
// o indicators after
o (L10L10L10L10L10L10L10L41<<<<<< o
o (L10L10L10L10L10L10L41<<<<< o
o (L10L10L10L10L10L41<<<< o
o (L10L10L10L10L41<<< o
o (L10L10L10L41<< o
o (L10L10L41< o
o (L10L41 o
o (L41+ o

// uo indicators before (facultative writing)
L30L10L10L10L10L10L10L10) o (<<<<<<< uo
L30L10L10L10L10L10L10) o (<<<<<< uo
L30L10L10L10L10L10) o (<<<<< uo
L30L10L10L10L10) o (<<<< uo
L30L10L10L10) o (<<< uo
L30L10L10) o (<< uo
L30L10) o (< uo
L30) o uo
// uo indicators after (facultative writing)
o (L10L10L10L10L10L10L30<<<<< uo
o (L10L10L10L10L10L30<<<< uo
o (L10L10L10L10L30<<< uo
o (L10L10L10L30<< uo
o (L10L10L30< uo
o (L10L30 uo
o (L30+ uo
L41J) o (+ o // o indicators before
o (L41+ o // o indicators after
o (JL41+ o


L30J) o uo // uo indicators before (facultative writing)
L30) o (+ uo
o (JL30 uo // uo indicators after (facultative writing)
o (L30+ uo


o uo // words with Latvian roots are more common o uo // words with Latvian roots are more common
o (_++ uo // common ending for Latvian words o (_++ uo // common ending for Latvian words
otu (_< uotu otu (_< uotu
o (_$w_alt2++ uo // $alt2 (international) words in lv_list, which are spelled with uo at the end o (_$w_alt2++ uo // $alt2 (international) words in lv_list, which are spelled with uo at the end


L41L10L10L10L10L10L10L10) o (lL01_<<<<< o: // [fhqxw]..ols
L41L10L10L10L10L10L10) o (lL01_<<<< o:
L41L10L10L10L10L10) o (lL01_<<< o:
L41L10L10L10L10) o (lL01_<< o:
L41L10L10L10) o (lL01_< o:
L41L10L10) o (lL01_ o:
L41L10) o (lL01_+ o:

oL10L10L10L10L10L10L10) o (lL01_<<<<<< o: // o...ols
oL10L10L10L10L10L10) o (lL01_<<<<< o:
oL10L10L10L10L10) o (lL01_<<<< o:
oL10L10L10L10) o (lL01_<<< o:
oL10L10L10) o (lL01_<< o:
oL10L10) o (lL01_< o:
oL10) o (lL01_ o:

L41J) o (lL01_+ o: // [fhqxw]..ols
oJ) o (lL01_ o: // o...ols
o (L62% o o (L62% o





aer) o o: aer) o o:
agn) o o agn) o o
agr) o o agr) o o
br) o (š o br) o (š o
celm) o uo celm) o uo
cet) o o cet) o o
cēl) o (L80 uo
cēl) o (L80 uo
cikl) o o: cikl) o o:
cit) o o cit) o o
_c) o (_+ o: _c) o (_+ o:
miel) o (L65 uo miel) o (L65 uo
miel) o uo miel) o uo
migl) o uo migl) o uo
mir) o (L80+ uo
mir) o (L80+ uo
miz) o uo miz) o uo
m) o (L86L14_+ uo // mosties m) o (L86L14_+ uo // mosties
mon) o o mon) o o
v) ol (ej ol v) ol (ej ol
v) ol (t ol v) ol (t ol
v) ol (u ol v) ol (u ol
z) ol (it ol
z) ol (it ol
@z) ol (L01_ o:l // ..zols @z) ol (L01_ o:l // ..zols
z) ol (L05_ uol // ..zole z) ol (L05_ uol // ..zole


hr) on (o on hr) on (o on
ikr) on (+ o:n ikr) on (+ o:n
im) on o>n im) on o>n
ir) on (i< o:n
ir) on (i< o:n
is) on on is) on on
itr) on o:n itr) on o:n
j) on (i on j) on (i on
ž) on (g oN ž) on (g oN


.group oo .group oo
_aut) oo (stL01_ o:uo // autoosta
_aut) oo (stL01_ o:uo // autoosta
k) oo (per o:o k) oo (per o:o
oo (_ oo: oo (_ oo:
z) oo oo: z) oo oo:


.group op .group op


L41L10L10L10sk) op (L01_ o: // ...skops
L41L10L10sk) op (L01_ o:
L41L10sk) op (L01_ o:

L41Jsk) op (L01_ o:p // ...skops
ad) op op ad) op op
cikl) op (L01_ o:p // ciklops cikl) op (L01_ o:p // ciklops
d) op op d) op op
eir) op (L04_ o:p eir) op (L04_ o:p
eir) op op eir) op op
_gal) op (L01_ op // galops _gal) op (L01_ op // galops
k) op (pr uop // ..koppr..
k) op (en op // Kopenhāgena k) op (en op // Kopenhāgena
k) op (ēC op // ..kopēt../..kopēš.. k) op (ēC op // ..kopēt../..kopēš..
k) op (ējL01_ uop // ..kopējs k) op (ējL01_ uop // ..kopējs
ab) or oR ab) or oR
ak) or oR ak) or oR
aleg) or o:R aleg) or o:R
alg) or oR
alg) or oR
am) or oR am) or oR
a) or oR a) or oR
aut) or (i@ oR aut) or (i@ oR
@@) oz (L05_ o:z // ..oze @@) oz (L05_ o:z // ..oze
ozo (lL01_ uozuo // ..ozols ozo (lL01_ uozuo // ..ozols
oz (on oz oz (on oz
ozo (_ o:zuo
ozo (_ o:zuo
p) oz oz p) oz oz
_r) oz (eL88L05_ oz // rozete _r) oz (eL88L05_ oz // rozete
_r) oz (īL80L05_ oz // rozīne _r) oz (īL80L05_ oz // rozīne


.group p .group p
p p p p
// pus..number stress on next syllable
_) pus (vien p%us
L55) p (L55 p>
_) pus (vien p%us // pus..number stress on next syllable
_) pus (div p%us _) pus (div p%us
_) pus (otr p%us _) pus (otr p%us
_) pus (trij p%us _) pus (trij p%us
ŗ r ŗ r


.group s .group s
sh s_!h_! // probably no need to make distinct in other places
sh s_!h_! // probably no need to make distinct in other places
_) s (L61 s_ // make s distinct at start of the word before unvocied consonants _) s (L61 s_ // make s distinct at start of the word before unvocied consonants
s s s s
L55) s (L55 s>


.group š .group š
š S š S
L55) š (L55 S>


.group t .group t
t t t t
L55) t (L55 t>


.group u .group u
ui ui ui ui

+ 2
- 3
docs/dictionary.md View File



`~` Letter in letter group means, that there can be no letter in this group `~` Letter in letter group means, that there can be no letter in this group
at the beginning or end of the word. at the beginning or end of the word.
Beware of [issue #196](https://github.com/espeak-ng/espeak-ng/issues/196).


_For example:_ _For example:_


|--------|-------------| |--------|-------------|
| `&` | A syllable which may be stressed (i.e. is not defined as unstressed). | | `&` | A syllable which may be stressed (i.e. is not defined as unstressed). |
| `V` | Matches only if a previous word has indicated that a verb form is expected. | | `V` | Matches only if a previous word has indicated that a verb form is expected. |
| `xxJ` | Skip letters until `xx`. Simple `xx` means start of current word. `xx_yy` means `xx` as end of previous and `yy` as start of current word. If necessary more than one `J` can be used. |
| `xxJ` | Skip letters until `xx`. Simple `xx` means start of current word. `xx_yy` means `xx` as end of previous and `yy` as start of current word. If necessary, more than one `J` can be used, and `Lxx` group as letter mark. |


e.g. e.g.


|-------------|-------------| |-------------|-------------|
| `+` | Force an increase in the score in this rule by 20 points (may be repeated for more effect). | | `+` | Force an increase in the score in this rule by 20 points (may be repeated for more effect). |
| `<` | Force a decrease in the score in this rule by 20 points (may be repeated for more effect). | | `<` | Force a decrease in the score in this rule by 20 points (may be repeated for more effect). |
| `Jxx` | Skip letters until `xx`. Simple `xx` means end of current word. `xx_yy` means `xx` as end of current and `yy` as start of next word. If necessary more than one `J` can be used. |
| `Jxx` | Skip letters until `xx`. Simple `xx` means end of current word. `xx_yy` means `xx` as end of current and `yy` as start of next word. If necessary, more than one `J` can be used, and `Lxx` group as letter mark. |
| `S<number>` | This number of matching characters are a standard suffix, remove them and retranslate the word. | | `S<number>` | This number of matching characters are a standard suffix, remove them and retranslate the word. |
| `P<number>` | This number of matching characters are a standard prefix, remove them and retranslate the word. | | `P<number>` | This number of matching characters are a standard prefix, remove them and retranslate the word. |
| `Lnn` | `nn` is a 2-digit decimal number in the range 01 to 20 Matches with any of the letter sequences which have been defined for letter group `nn` | | `Lnn` | `nn` is a 2-digit decimal number in the range 01 to 20 Matches with any of the letter sequences which have been defined for letter group `nn` |

+ 46
- 34
src/libespeak-ng/dictionary.c View File

return phon_out_buf; return phon_out_buf;
} }


static int LetterGroupNo(char *rule)
{
/*
* Returns number of letter group
*/
int groupNo = *rule;
groupNo = groupNo - 'A'; // substracting 'A' makes letter_group equal to number in .Lxx definition
if (groupNo < 0) // fix sign if necessary
groupNo += 256;
return groupNo;
}

static int IsLetterGroup(Translator *tr, char *word, int group, int pre) static int IsLetterGroup(Translator *tr, char *word, int group, int pre)
{ {
/* Match the word against a list of utf-8 strings. /* Match the word against a list of utf-8 strings.
* returns length of matching letter group or -1
* *
* How this works: * How this works:
* *
} else } else
w = word; w = word;


// If no character is allowed in group
// at the start (for pre-rule) or end (post-rule)
// of the checked letter in the word, return true.
if (*p == '~' && *w == ' ') // word end checked because of comment below
return 1;
/* TODO: Need to investigate why word end mark _ doesn't work properly
* for post rule somewhere in MatchRule() function. or e.g.:
*
* .L01 ~ b c
* .group a
* _L01) a i // this works
* a (L01_ u // this doesn't work
*/
// If '~' (no character) is allowed in group, return 0.
if (*p == '~')
return 0;


// Check current group
while ((*p == *w) && (*w != 0)) { while ((*p == *w) && (*w != 0)) {
w++; w++;
p++; p++;
while (*p++ != 0) while (*p++ != 0)
; ;
} }
return 0;
// Not found
return -1;
} }


static int IsLetter(Translator *tr, int letter, int group) static int IsLetter(Translator *tr, int letter, int group)
switch (rb) switch (rb)
{ {
case RULE_LETTERGP: case RULE_LETTERGP:
letter_group = *rule++ - 'A';
letter_group = LetterGroupNo(rule++);
if (IsLetter(tr, letter_w, letter_group)) { if (IsLetter(tr, letter_w, letter_group)) {
lg_pts = 20; lg_pts = 20;
if (letter_group == 2) if (letter_group == 2)
failed = 1; failed = 1;
break; break;
case RULE_LETTERGP2: // match against a list of utf-8 strings case RULE_LETTERGP2: // match against a list of utf-8 strings
letter_group = *rule++ - 'A';
if (letter_group < 0)
letter_group += 256;
if ((n_bytes = IsLetterGroup(tr, post_ptr-1, letter_group, 0)) > 0) {
letter_group = LetterGroupNo(rule++);
if ((n_bytes = IsLetterGroup(tr, post_ptr-1, letter_group, 0)) >= 0) {
add_points = (20-distance_right); add_points = (20-distance_right);
post_ptr += (n_bytes-1);
if (n_bytes > 0) // move pointer, if non-zero length group was found
post_ptr += (n_bytes-1);
} else } else
failed = 1; failed = 1;
break; break;
case RULE_SKIPCHARS: case RULE_SKIPCHARS:
{ {
// '(Jxy' means 'skip characters until xy' // '(Jxy' means 'skip characters until xy'
char *p = post_ptr + letter_xbytes;
char *p2 = p; // pointer to the previous character in the word
int rule_w; // first wide character of skip rule
char *p = post_ptr - 1; // to allow empty jump (without letter between), go one back
char *p2 = p; // pointer to the previous character in the word
int rule_w; // first wide character of skip rule
utf8_in(&rule_w, rule); utf8_in(&rule_w, rule);
while ((letter_w != rule_w) && (letter_w != RULE_SPACE) && (letter_w != 0)) {
int g_bytes = -1; // bytes of successfully found character group
while ((letter_w != rule_w) && (letter_w != RULE_SPACE) && (letter_w != 0) && (g_bytes == -1)) {
if (rule_w == RULE_LETTERGP2)
g_bytes = IsLetterGroup(tr, p, LetterGroupNo(rule + 1), 0);
p2 = p; p2 = p;
p += utf8_in(&letter_w, p); p += utf8_in(&letter_w, p);
} }
if (letter_w == rule_w)
if ((letter_w == rule_w) || (g_bytes >= 0))
post_ptr = p2; post_ptr = p2;
} }
break; break;
switch (rb) switch (rb)
{ {
case RULE_LETTERGP: case RULE_LETTERGP:
letter_group = *rule++ - 'A';
letter_group = LetterGroupNo(rule++);
if (IsLetter(tr, letter_w, letter_group)) { if (IsLetter(tr, letter_w, letter_group)) {
lg_pts = 20; lg_pts = 20;
if (letter_group == 2) if (letter_group == 2)
failed = 1; failed = 1;
break; break;
case RULE_LETTERGP2: // match against a list of utf-8 strings case RULE_LETTERGP2: // match against a list of utf-8 strings
letter_group = *rule++ - 'A'; // substracting 'A' makes letter_group equal to number in .Lxx definition
if(letter_group<0)
letter_group += 256;
if ((n_bytes = IsLetterGroup(tr, pre_ptr, letter_group, 1)) > 0) {
letter_group = LetterGroupNo(rule++);
if ((n_bytes = IsLetterGroup(tr, pre_ptr, letter_group, 1)) >= 0) {
add_points = (20-distance_right); add_points = (20-distance_right);
pre_ptr -= (n_bytes-1);
if (n_bytes > 0) // move pointer, if non-zero length group was found
pre_ptr -= (n_bytes-1);
} else } else
failed = 1; failed = 1;
break; break;


case RULE_SKIPCHARS: { case RULE_SKIPCHARS: {
// 'xyJ)' means 'skip characters backwards until xy' // 'xyJ)' means 'skip characters backwards until xy'
char *p = pre_ptr; // pointer to current character in word
char *p2 = p; // pointer to previous character in word
char *p = pre_ptr + 1; // to allow empty jump (without letter between), go one forward
char *p2 = p; // pointer to previous character in word
int g_bytes = -1; // bytes of successfully found character group


while ((*p != *rule) && (*p != RULE_SPACE) && (*p != 0)) {
while ((*p != *rule) && (*p != RULE_SPACE) && (*p != 0) && (g_bytes == -1)) {
p2 = p; p2 = p;
p--; p--;
if (*rule == RULE_LETTERGP2)
g_bytes = IsLetterGroup(tr, p2, LetterGroupNo(rule + 1), 1);
} }


// if succeed, set pre_ptr to next character after 'xy' and remaining // if succeed, set pre_ptr to next character after 'xy' and remaining
// 'xy' part is checked as usual in following cycles of PRE rule characters // 'xy' part is checked as usual in following cycles of PRE rule characters
if (*p == *rule) if (*p == *rule)
pre_ptr = p2; pre_ptr = p2;
if (g_bytes >= 0)
pre_ptr = p2 + 1;

} }
break; break;



Write Preview
Loading…
Cancel
Save