Beispiel
Bei der Konstruktion eines Akzeptors stellt sich in der Regel das Problem, ganze Zeichenklassen auf ein
Eingabe-Zeichen abzubilden. Die Zeichenklassen kann man mit regulären Ausdrücken beschreiben. Die freie Unit
regExpr von Andrey V. Sorokin hilft dieses Problem zu lösen.
function conv(ch : char) : char;
begin
if ExecRegExpr('[0-9]',ch) then result := 'z'
else
if ExecRegExpr('[A-Za-z]',ch) then result := 'b'
else
if ExecRegExpr('[ \n\r\t\f]',ch) then result := 'w'
else
if ch = ',' then result := 'k'
else
result := 's'
end;
scan1.zip
Links