let bitfield_size_bf lv = Bit_utils.sizeof_lval lv