Bug fix in parse_program().