method
virtual
push_block :
'
a
->
unit