let
parse_string entry loc str =
parse_tokens_before_filter entry
(lex_string entry.egram loc str)