在Pharo中使用PetitParser解析註釋

Question

解析1行註釋的方法比這更簡單嗎？

comment 
    ^'//' asParser , 
     (#any asParser starLazy: (#newline asParser)) , 
     #newline asParser 
        ==> [ :result | nil "Ignore comments" ] 
program 
    ^(comment/instruction) star 
     ==> [ :result | N2TProgramNode new 
           setNodes: (result copyWithout: nil) ] 

我特別不確定重複（#newline asParser）和#copyWithout :.

盧卡斯的回答後，我想出了更簡單的解決方案如下：

program 
    ^programEntity star 
     ==> [ :result | N2TProgramNode new setNodes: result] 

programEntity 
    ^instruction trim: ignorable 

ignorable 
    ^comment/#space asParser 

comment 
    ^'//' asParser , #newline asParser negate star 

Answer 1

爲什麼不這樣的評論解析器的工作呢？你

'//' asParser , #newline asParser negate star 

可能還需要包括註釋的解析與trim:空白解析（如果語法允許的話），所以你不必去想它所有的時間。