let
is_calloc_function v = isFunctionType v.vtype
&&
v.vname = name_of_calloc