14 lines
344 B
Smalltalk
14 lines
344 B
Smalltalk
|
"
|
||
|
|
A parser that performs an action block upon activation with the stream and a continuation block.
|
||
|
|
"
|
||
|
|
Class {
|
||
|
|
#name : 'PPWrappingParser',
|
||
|
|
#superclass : 'PPActionParser',
|
||
|
|
#category : 'PetitParser-Parsers'
|
||
|
|
}
|
||
|
|
|
||
|
|
{ #category : 'parsing' }
|
||
|
|
PPWrappingParser >> parseOn: aPPContext [
|
||
|
|
^ block value: aPPContext value: [ parser parseOn: aPPContext ]
|
||
|
|
]
|