259 TIF

// Czy na początku szSrc jest leksem? Zwraca -1 jeśli nie. W przeciwnym i // zwraca liczbę znaków w leksemie.

int RExp::IStartTokenPchOnce(const char *szSrc, char *szToken)

{

char *pchToken = szToken; const char *pchSrc = szSrc; char chToken; char chSrc;

while(TRUE)

{

//Jeśli napis leksemu jest zakończony, to pomyślnie dopasowaliśmy. if(0 == (chToken = *pchToken)) return pchSrc - szSrc;

// Jeśli napis źródłowy jest zakończony, to nie dopasowaliśmy. if(0 == (chSrc = *pchSrc)) return -1;

if(chToken == 'W')

{

pchToken++;

if(!FSpecialChar(*pchToken, chSrc)) return -1;

}

else

{

if(chSrc != chToken) return -1;

}

pchSrc++;

pchToken++;

}

}

int RExp::IStartTokenPch(const char *szSrc, char *szToken)

{

int iMatchT;

const char *pch = szSrc;

DWORD cdwMin;

DWORD cdwMax;

cdwMin = m_cdwMin; cdwMax = m_cdwMax; while(cdwMin >0)