Find the block to which a token belongs

Description

Two assignment tokens EQ_ASSIGN belong to the same block if they are not separated by more than one token. Token between EQ_ASSIGN tokens belong to the EQ_ASSIGN token occurring before them, except the token right before EQ_ASSING already belongs to the EQ_ASSING after it.

Usage

find_block_id(pd)

Arguments