我正在学习如何在 Pharo、Smalltalk 上使用 PetitParser,并且我正在使用教科书来学习它。教科书中给出了以下脚本。
term := PPDelegateParser new.
prod := PPDelegateParser new.
prim := PPDelegateParser new.
term setParser: (prod , $+ asParser trim , term ==> [ :nodes | nodes first + nodes last ]) / prod.
prod setParser: (prim , $*asParser trim , prod ==> [ :nodes | nodes first*nodes last ]) / prim.
prim setParser: ($( asParser trim , term , $) asParser trim ==> [ :nodes | nodes second ]) / number.
start := term end.
start parse:'1+2*3'.
但是,当我尝试在 Playground 上打印它时,我得到 MessageNotUnderstood: receive of "parseOn:"is nil。 我做错了什么?
最佳答案
如果添加 number
的定义,解析器将生成所需的结果。以下代码执行此操作,并且在其他方面与您的代码相同(格式除外)
number := #digit asParser plus token trim
==> [:token | token inputValue asNumber].
term := PPDelegateParser new.
prod := PPDelegateParser new.
prim := PPDelegateParser new.
term
setParser: prod , $+ asParser trim , term
==> [:nodes | nodes first + nodes last]
/ prod.
prod
setParser: prim , $* asParser trim , prod
==> [:nodes | nodes first * nodes last]
/ prim.
prim
setParser: $( asParser trim , term , $) asParser trim
==> [:nodes | nodes second]
/ number.
start := term end.
^start parse: '1+2*3'
关于smalltalk - 教科书上的 PetitParser 算术脚本不起作用。它一直说 ParseOn 为零?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/42029970/