method
virtual
pull_block :
'
a
->
unit