编译原理程序pascalsub_P文法