alterntive tir_black for erlang