Implementation of DFA 10/10
  case state of
    ...
    p : begin {comment}
          if symbol = '}' then
            state := s; {start state}
        end; {state p}
until EOF;
...
end;
19/35
s
{
}
S  – }
p