update parse-error and make PL/0 ?x top-level fn